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O POTRZEBIE ŁADU 
I PORZĄDKU 


Drogi Czytelniku, błagam! Nie sugeruj 
się tytułem! Ten felieton bynajmniej nie jest 
dedykowany wiadomym czynnikom: jak 
zwykle zamierzam się bowiem pastwić nad 
(mikro) informatyką, głównie rodzimą. 

Pasjonując się na bieżąco rozwojem te- 
chniki mikrokomputerowej, dobrze jest nie 
tracić historycznej perspektywy. Jeśli idzie 
o sam sprzęt, to nawiązując do historii 
motoryzacji można by założyć, że jesteśmy 
w okresie ekspansji słynnego Forda T, 
którego masowa produkcja spowodowała 
skutki zbliżone do ekspansji IBM PC i jego 
pociotków. Jeśli natomiast rozpatrzymy 
komputer osobisty po prostu jako narzę- 
dzie pracy, „„,czarną skrzynkę”, to sądzę, że 
odniesieniem w historii automobilizmu 
musiałyby być czasy dużo wcześniejsze. 
Zapewne byłby to okres pionierskich poja- 
zdów budowanych na podobieństwo bry- 
czek, pokracznych dziwolągów plujących 
ogniem i smrodem. 

Motoryzacja dawno przestała być pry- 
watną sprawą konstruktorów. Dziś każdy 
wie, jak z grubsza powinien wyglądać sa- 
mochód, a zwłaszcza, jak powinien być 
obsługiwany. Biada projektantowi, który 
odrzucając kierownicę zaproponowałby 
np. zmianę kierunku za pomocą pedałów, 
a dźwignie hamulca głównego i sprzęgła 
wetknął kierowcy w ręce. Klienci tego nie 
zaakceptują, chociażby wytoczyć tysiąc ar- 
gumentów. Co innego przed 90 laty. Każdy 
mógł tak zmajstrować organa kierujące, 
jak mu się żywnie podobało i nikomu to nie 
przeszkadzało. W końcu jedynym szoferem 
bywał właściciel-konstruktor. 

Zasady obsługi samochodów są dzisiaj 
dalece ujednolicone, tak że kierowca „„ma- 
lucha” bez kłopotu opanuje jazdę mer- 
cedesem i odwrotnie. W każdym razie 
podstawowe przyzwyczajenia kierowcy zo- 
staną uszanowane. A jak to wygląda 
z oprogramowaniem? Jeszcze przed kilku 
laty każdy producent organizował dialog 
programu z użytkownikiem w sposób zu- 
pełnie dowolny, wykoncypowany samo- 
dzielnie lub podpatrzony u konkurencji. 
W każdym razie obsługa konkretnego pro- 
gramu bywała sztuką samą w sobie. Za- 


czynając pracę z nowym programem nale- 
żało zdobywać umiejętności od zera, a do- 
tychczasowe doświadczenie raczej prze- 
szkadzało niż pomagało (stare nawyki!). 

Czy doczekamy błogosławionych cza- 
sów, w których zasady obsługi typowych 
programów zostaną ujednolicone tak, jak 
technika prowadzenia auta? Wagę proble- 
mu doceniła m.in. firma IBM, lansując 
system jednolitej architektury oprogramo- 
wania, który ma obejmować pełne spekt- 
rum sprzętu: od komputerów osobistych 
do superkomputerów. Chodzi m.in. o to, 
aby niezależnie od tego, przed jakim ek- 
ranem posadzimy użytkownika, od razu 
poczuł się on swojsko w znajomym środo- 
wisku. 

Innym przedsięwzięciem, zmierzającym 
do ujednolicenia dialogu człowieka z kom- 
puterem, jest system Microsoft Windows. 
Wszystkie programy, tworzone jako jego 
aplikacje, korzystają z tych samych pod- 
stawowych środków dialogu, jak rozwijane 
w dół menu, okna dialogowe, przewijające 
się listy itd. Dość, że człowiek nabędzie 
wprawy w obsłudze jednej aplikacji, to do 
uruchomienia następnej i wykonania w niej 
podstawowych czynności podręcznik jest 
zbędny. W każdym razie nie trzeba uczyć 
się nowych technik dialogu. Wystarczy 
przeczytać, co program robi, a jak wywołać 
daną czynność, często podpowie intuicja. 
Twórcy różnych aplikacji Windows starają 
się np. możliwie jednolicie rozmieszczać 
poszczególne opcje menu, a nawet w miarę 
możliwości stosować typowe nazwy stan- 
dardowych opcji. Wszystko to służy powię- 
kszeniu psychicznego komfortu użytkow- 
nika i zminimalizowaniu czasu, potrzeb- 
nego na opanowanie nowego programu. 
W krajach, gdzie czas ma wysoką cenę, jest 
to argument o poważnym znaczeniu. 

Systemy operacyjne OS-2 czy DOS 4.0 są 
przykładem dążenia do takiej właśnie jed- 
nolitości dialogu. Ale nawet producenci nie 
korzystający z systemu Windows starają 
się często stosować w swych produktach 
zapożyczone z Windows techniki dialogu. 
W Polsce jesteśmy ciągle dalecy od tak 
wysublimowanych problemów. Nie może- 
my uporać się ze sprawami tak elementar- 
nymi, jak chociażby ujednolicenie termino- 
logii informatycznej, albo sposobu kodo- 
wania polskich liter. Czyżby nie było niko- 
go predestynowanego do takiego przed- 
sięwzięcia? Instytucje państwowe — to 
w czasach mody na demokrację nie brzmi 
dobrze. Co na to jednak np. Polskie Towa- 


rzystwo Informatyczne, które nie przepu- 
szcza żadnej okazji do biadolenia nad 
kalekim stanem komputeryzacji, a także 
nad sobiepaństwem amatorów, rzemieśl- 
ników, spółek itd., które robią swoje nie 
oglądając się na autorytety? 

Niestety, w tak  skomercjalizowanej 
i urynkowionej dziedzinie jak mikroinfor- 
matyka siły oddziaływania nie zdobywa się 
przez wymądrzanie się. Siła ta musi wyni- 
kać z faktów dokonanych o wyraźnej, 
jednoznacznej wymowie. Za takie trudno 
jednak uznać gremialne nasiadówki albo 
firmowanie chałtur, realizowanych przez 
ludzi, którym jest obojętne, pod jakim 
szyldem pracują, byle szyld dobrze wy- 
glądał i pozwalał wynegocjować tłustą za- 
płatę. 

Uporządkowanie i ujednolicenie zasad 
obsługi szeroko rozumianych systemów 
komputerowych staje się problemem coraz 
lepiej postrzeganym, w miarę jak rola kom- 
putera w naszej cywilizacji staje się porów- 
nywalna z rolą samochodu. Warto już 
teraz poczynić praktyczne kroki. Jednym 
z najistotniejszych jest oddziaływanie na 
twórców oprogramowania, podsuwanie im 
odpowiednich wzorców oraz aparatu poję- 
ciowego i metodycznego, a także narzędzi. 
Oprócz tego trzeba stworzyć obowiązują- 
ce, choć niekoniecznie formalne, zasady 
nazewnictwa typowych obiektów i czynno- 
ści, tworzenia komunikatów i meldunków. 
Chodzi o to, aby te same rzeczy lub zdarze- 
nia nazywały się tak samo w różnych 
programach. Nie zawsze można wymagać 
od programisty trafnych propozycji języ- 
kowych. Czasem należałoby mu trochę 
pomóc. Czy opracowanie i rozpropagowa- 
nie np. krajowych wytycznych dotyczących 
terminologii informatycznej i zasad dialo- 
gu z użytkownikiem w języku polskim nie 
byłoby zadaniem godnym PTI? 

Istotne jest też uświadamianie programi- 
stom wagi problemu, gdyż wielu nawet 
dobrych programistów odnosi się do pro- 
blemów dialogu z użytkownikiem z za- 
skakującym lekceważeniem i z niechęcią do 
opierania się na rozpowszechnionych kon- 
wencjach. Nie wszyscy muszą przecież sami 
odkrywać Amerykę — większość może 
tam dotrzeć po śladach Kolumba. Aby 
pójść utartym, dobrze wytyczonym szla- 
kiem, trzeba mocnych i budzących zaufa- 
nie drogowskazów. Ktoś mocny powinien 
je jednak powbijać. 


Roland Wacławek 
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Wprawdzie nie podniecam się tak czytaniem anonsów prasowych jak 
niektórzy spośród moich redakcyjnych Kolegów, ale czasem znajdzie się 
jakiś smakowity kąsek i dla kogoś, kto nie pasjonuje się wymianą M-4 
w Gdańsku na podobne w Warszawie lub odwrotnie. Mój Przyjaciel np. 
przywiózł mi z Indii miejscowe gazety angielskojęzyczne z cudownymi 

„perełkami” sztuki ogłoszeniowej. Oj, uczmy się od Hindusów metody 
reklamowania swoich możliwości! Nie każda bowiem dziewczyna w Polsce 
dając ogłoszenie matrymonialne określiłaby się jako „extremely beauty” 
(w wolnym przekładzie: wyjątkowa piękność) i nie każdy kamieniarz 
z Bródna lub Powązek wyzywałby poprzez ogłoszenie prasowe wszystkich 
kamieniarzy świata do-walki w swej profesji jak pewien mistrz z dorzecza 
Indusu lub Gangesu. Oczywiście w Indiach ogłoszenia matrymonialne 
zdmieszczają rodzice kandydata lub kandydatki, a kamieniarstwo nie 
ogranicza się do nagrobków i kominków wykonywanych z niezbyt uroz- 
maiconych surowców krajowych, ale agresywność takiego ogłoszenia jest 
dla Polaka i tak nieco szokująca. 

Jak się to wszystko ma do komputera? Nie, nie, nie będę po raz kolejny 
pisał o prymitywizmie naszej rodzimej reklamy czy o dziesiątkach ogłoszeń 
firm komputerowych i pseudokomputerowych zajmujących niestety coraz 
więcej miejsca w merytorycznych częściach pism ze szkodą dla Czytelnika. 
Zastanawia mnie natomiast nietaktowna z punktu widzenia etyki (już 
widzę, jak handlowcy pukają się wymownie w mądre, pobrużdżone w mozole 
nad zdobywaniem dolara i złotówki, czoła) próba przekonania Czytelnika, 
że tu się sprzedaje coś zupełnie nadzwyczajnego i'nie spotykanego u tej 
wrednej konkurencji. Jak bowiem wszyscy nieco lepiej zorientowani wiedzą, 
Polaków na najdroższy i najlepszy (a te dwie rzeczy niestety się łączą!) 
sprzęt nie stać, a poza tym przepisy COCOM-u znacznie utrudniają jego 
import do krajów socjalistycznych. Tak więc na naszym rynku dominuje 
tajwańsko-koreański „klon” IBM-a w różnych obudowach, co dla laików 
ma ogromne znaczenie (zwłaszcza dla Pań — „O, ten by mi pasował do tej 
perłowej sukni i moich włoskich pantofli!'). W związku więc z sytuacją 
panującą na rynku komputerowym uważam, że jesteśmy w pompatyczności 
naszych reklam i anonsów wcale nie gorsi od rodziców panienki, którą 
trzeba sprzedawać przez ogłoszenie w gazecie pod szyldem „extremely 
beauty”, bo do tej pory tego (hm, przepraszam za przypadkowe podobień- 
stwo ze slangiem młodzieżowym) towaru nikt nie wypatrzył i nie kupił. 
Bywa czasem bowiem skrajne piękno tak skrzętnie ukryte, że aż niewidocz- 
ne i wtedy najlepiej posunąć się do reklamy. My to też robimy — może 
w nieco innym — hm — asortymencie. 

Pozostaje jeszcze pytanie o co chodzi autorowi niniejszego tekstu — czy 
np. nie ma zamiaru niszczyć rodzimych kiełków komputeryzacji? O nie 
— chodzi tylko o to, by zwyciężyli — przy mniej więcej równym poziomie 
oferowanego sprzętu — ci najsolidniejsi i najtańsi, a podobno dobry towar 
nie wymaga reklamy — co najwyżej rzetelnej i fachowej informacji, czego 
wszystkim użytkownikom komputerów serdecznie życzy niżej podpisany. 


JERZY KLAWIŃSKI 





KTO NIE LUBI 
PRZETWARZANIA WSADOWEGO? 


Podobnie jak praktycznie wszystkie współczesne sys- 
temy operacyjne, także MS/PC-DOS dysponuje językiem 
tzw. przetwarzania wsadowego. Podczas gdy inne języki 
programowania służą do realizacji, np. obliczeń lub 
administrowania danymi, to język przetwarzania wsado- 
wego służy do programowania pracy samego systemu 
operacyjnego. Zamiast mozolnie wprowadzać z klawiatu- 
ry ciągi tych samych zleceń, można zapisać je w tzw. pliku 
przetwarzania wsadowego (pliku sterującym przetwarza- 
niem wsadowym, odtąd zwanym krótko: plikiem wsado- 
wym). Po wywołaniu takiego pliku, wszystkie zawarte 
w nim zlecenia będą kolejno realizowane, zupełnie tak, 
jak gdyby były wprowadzane z klawiatury w trybie 
interakcyjnym. Pliki wsadowe są znakomitym narzę- 
dziem do usprawnienia dialogu z systemem operacyjnym, 
zwłaszcza zaś do automatyzacji czynności rutynowych. 
Niestety, praktyka dowodzi, że wielu użytkowników 
komputerów klasy PC/XT i AT znajomość z przetwarza- 
niem wsadowym ogranicza co najwyżej do pliku 
AUTOEXEC.BAT, zawierającego kilka sekwencyjnych 
zleceń. Tymczasem możliwości programowania wsado- 
wego są znacznie szersze i obejmują m.in. przekazywanie 
parametrów, operacje warunkowe oraz pętle. 

W systemie MS/PC-DOS pliki wsadowe noszą standar- 
dowe rozszerzenie: .BAT. Plik wsadowy to zwykły plik 
tekstowy, w którym każda linia zawiera pojedyncze 
zlecenie. Plik taki można utworzyć każdym edytorem 
dostarczającym tekstu nie sformatowanego, jak np. 
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ROLAND WACŁAWEK 


EDLIN lub SideKick, a nawet zapisać go na dysk wprost 
z konsoli, podając zlecenie: 


COPY CON: Dysk: ścieżka do kataloguNnazwa_ piku. BAT 


Oznaczenie dysku i ścieżki można opuścić, nie wolno 
natomiast pominąć rozszerzenia .BAT. Po wprowadze- 
niu ciągu zleceń wystarczy nacisnąć klawisz (F6), lub 
kombinację (Ctrl) + (Z), co powoduje wprowadzenie 
znaku końca pliku EOF, a potem (Enter). Nazwa: 
AUTOEXEC.BAT jest zarezerwowana dla pliku wsado- 
wego, którego system operacyjny poszukuje automatycz- 
nie natychmiast po załadowaniu i w razie odnalezienia go 
— przystępuje do realizacji zawartych w nim zleceń 
jeszcze przed przystąpieniem do konwersacji z operato- 
rem. 

Uruchomienie pliku wsadowego odbywa się po prostu 
przez wprowadzenie z klawiatury jego nazwy, ewentua|- 
nie poprzedzonej oznaczeniem stacji dysków i ścieżki 
i uzupełnionej parametrami, jeśli takie są wymagane. 
Trzeba jednak pamiętać, że jeśli w tym samym katalogu 
znajduje się obok pliku typu .BAT także plik typu .EXE 
lub .COM o identycznej nazwie, to pierwszeństwo w wy- 
konaniu będą miały pliki .COM i .EXE. 

Przykładem zastosowania pliku wsadowego mogą być 
prace programistyczne, np. w języku asemblera, w któ- 


rych stale powtarza się ten sam tok postępowania: edycja 
programu, uruchomienie asemblacji, jeśli nie wykryto 
błędów — konsolidacja programu, często, przetwarzanie 
programu z postaci .EXE na .COM programem 
EXE2BIN, a na koniec uruchamianie programu pod 
kontrolą debuggera DEBUG. Ponieważ podczas prac 
nad programem ten ciąg czynności powtarza się dziesiątki 
i setki razy, to warto zapisać odpowiednie zlecenie w pliku 
wsadowym, a potem powierzyć mu automatyczną reali- 
zację całego procesu od zakończenia edycji do urucho- 
mienia programu. 

W pliku wsadowym mogą wystąpić praktycznie wszys- 
tkie zlecenia, używane normalnie w trybie bezpośrednim. 
Oprócz tego plik wsadowy może zawierać instrukcje 
sterujące przetwarzaniem wsadowym, pozwalające two- 
rzyć proste programy, realizujące pewne czynności cyk- 
licznie lub wielokrotnie dla różnych argumentów, albo też 
uzależniające wykonanie zlecenia od spełnienia pewnych 
warunków. W pliku wsadowym może wystąpić do 10, 
a w pewnych warunkach i więcej parametrów formal- 
nych, na ogół stosowanych w zleceniach w miejsce nazw 
plików. Przy wywoływaniu pliku wsadowego można 
natomiast podać zbiór parametrów rzeczywistych, które 
podczas realizacji poszczególnych zleceń zostaną wsta- 
wione w miejsce odpowiednich parametrów formalnych. 


Przypuśćmy, że często zachodzi potrzeba wykonywa- 
nia następujących operacji: kopiowania wszystkich pli- 
ków z rozszerzeniem .PAS z dysku A na B, następnie 
kasowania na dysku A wszystkich plików z rozszerzeniem 
„BAK. Na koniec należy wyprowadzić, strona po stronie 
i porządku alfabetycznym, wszystkie pliki z katalogu 
głównego dysku A. Sporządzimy krótki plik wsadowy, 
zawierający trzy zlecenia. Zapiszemy go wprost z konsoli 
na dysku A, np. pod nazwą OCZYSCA.BAT. Oto 
protokół konwersacji z systemem na ekranie monitora: 


A> COPY CON: OCZYSCA. BAT 
COPY A::. PAS B: 

DEL A:2. BAK 

DIR: SORT ; MORE 


A> OCZYSCA 


Ostatnia linia jest już wywołaniem przygotowanego 
pliku wsadowego (funkcjonowanie programu wsadowe- 
go wymaga obecności na dysku A także systemowych 
programów SORT i MORE). 

Wspomnieliśmy już, że w pliku wsadowym można użyć 
parametrów formalnych, które w fazie realizacji będą 
zastąpione parametrami rzeczywistymi, podanymi w linii 
zlecenia po nazwie pliku wsadowego. Parametry formal- 
ne noszą nazwy, złożone ze znaku *% icyfry 0”..*9”, np. 
%l, %5, itd. Wynika stąd, że w pliku wsadowym można 
użyć do 10 parametrów formalnych. Liczba parametrów 
rzeczywistych może być natomiast większa w razie użycia 
instrukcji SHIFT, o czym później. Przy wywołaniu pliku 
wsadowego, w miejsce parametru 0 zostanie podstawiona 
nazwa samego pliku wsadowego, zaś w miejsce paramet- 
rów 1. .9— kolejne następne parametry rzeczywiste. Oto 
przykład pliku wsadowego z parametrami formalnymi: 


COPY 71. BAK Z2. PAS 
TYPE 72. PAS 
TYPE 0. BAT 





Niech plik nosi nazwę KOPIUJ.BAT. Aby rozpocząć 
przetwarzanie należy wprowadzić nazwę pliku wsadowe- 
go bez rozszerzenia, umieszczając po nazwie kolejne 
parametry, rozdzielone spacjami: 

KOPIUJ PROGRAM TEST 
W efekcie zostaną wykonane zlecenia następujące: 


COPY PROGRAM. BAK TEST. PAS 
TYPE TEST. PAS 
"TYPE KOPIUJ. BAT 


Po utworzeniu kopii pliku PROGRAM.BAK pod 
nazwą TEST.PAS, treść pliku TEST.PAS zostanie wyli- 
stowana na ekranie. Po niej pojawi się listing zawartości 
— zawartość samego pliku wsadowego, tzn. trzy przed- 
stawione wcześniej zlecenia z ich parametrami. Jak widać, 
przy przekazywaniu parametrów można składać z frag- 
mentów dowolne napisy, w tym specyfikacje plików. 


Z uwagi na zastosowanie znaku '%'” jako przedrostka 
nazwy parametru formalnego, stosując w pliku wsado- 
wym znak należy go zapisać w postaci podwojonej "%%” 
(warto zwrócić na to uwagę w instrukcji FOR). 


Przedstawimy teraz poszczególne instrukcje przetwa- 
rzania wsadowego, zaczynając od najprostszych. 


ECHO ON lub ECHO OFF lub ECHO komunikat 


Zlecenie: ECHO zmienia na przeciwny stan wewnętrz- 
nego przełącznika systemu operacyjnego, sterującego 
wyprowadzaniem na ekran komunikatów i zleceń pliku 
wsadowego. Pierwotnie przełącznik echa jest włączony, 
co powoduje wyprowadzanie na ekran treści wszystkich 
realizowanych linii pliku wsadowego, tak, jak gdyby były 
one wprowadzane z klawiatury. Wyprowadzane są też 
ewentualne komunikaty podane w zleceniach REM 
i PAUSE. Po wyłączeniu echa zleceniem: ECHO OFF, na 
ckranie będą pojawiać się tylko teksty wyprowadzane 
przez poszczególne programy, natomiast treść zleceń 
pliku wsadowego .BAT i komunikaty umieszczone w in- 
strukcjach REM i PAUSE nie ukażą się (PAUSE wy- 
świetli tylko napis: Strike any key...). Ponowne uakty- 
wnienie (włączenie) echa jest możliwe zleceniem: 
ECHO ON. 


Jeśli plik wsadowy ma wyprowadzać na ekran okreś- 
lone meldunki, niezależnie od ewentualnie wyłączonego 
echa, meldunki te należy umieścić bezpośrednio w zlece- 
niu ECHO. W tym przypadku zlecenie ECHO działa 
podobnie jak REM, lecz niezależnie od stanu przełącz- 
nika echa. Uwaga! W komentarzu nie wolno używać 
nawiasów kątowych ©” ani *y, stosowanych do przełą- 
czania strumieni! Odnosi się to także do instrukcji REM 
i PAUSE. 


REM komunikat lub REMARK komunikat 


Instrukcja: REM służy do wyprowadzania na ekran 
dowolnych meldunków, informujących np. o stanie za- 
awansowania realizacji zadania, albo do komentowania 
zawartości samego programu wsadowego. Komunikat 
musi się mieścić w jednym wierszu, może też być pusty. 
Jeżeli zajdzie potrzeba wyprowadzania dłuższych mel- 
dunków lub objaśnień, można posłużyć się kilkoma 
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kolejnymi instrukcjami REM, albo też zapisać treść 
komunikatu w oddzielnym pliku dyskowym, wyprowa- 
dzanym następnie na ekran pojedynczym zleceniem TY- 
PE, umieszczonym w pliku wsadowym. Wyprowadzanie 
komunikatów zawartych w pliku wsadowym w zlece- 
niach REM i REMARK można zablokować umieszcza- 
jąc wcześniej w pliku tym zlecenie: ECHO OFF. 

PAUSE komunikat 

Instrukcja: PAUSE powoduje wstrzymanie realizacji 
następnych instrukcji pliku wsadowego do chwili naciś- 
nięcia dowolnego klawisza. Po napotkaniu w pliku 
wsadowym instrukcji PAUSE, na ekranie pojawi się 
komunikat: 

Strike any key when ready... 
W celu kontynuacji programu naciśnij dowolny 
klawisz 

Aby zwrócić uwagę operatora i udzielić mu niezbęd- 
nych wskazówek, można (choć nie trzeba) w instrukcji 
PAUSE umieścić dowolny komunikat. Nie będzie on 
jednak widoczny po wyłączeniu echa (ECHO OFF). Aby 
przerwać realizację programu wsadowego, należy użyć 
klawiszy (Ctrl) + (C). lub (Ctrl) + (Break). Na ekranie 
pojawi się wówczas pytanie: 

Terminate batch job (Y/N)? 
Czy zakończyć zadanie wsadowe? (Klawisz (Y) po- 
twierdza). 

Instrukcja PAUSE umożliwia realizację programu 
wsadowego krok po kroku, pozostawiając za każdym 
razem użytkownikowi decyzję o jego kontynuacji bądź 
przedwczesnym przerwaniu (np. w zależności od uzys- 
kanych wcześniej rezultatów). Przykład: 

PAUSE Wstaw do stacji A> dysk z danymi! 

Na ekranie pojawi się komunikat wzywający do zmia- 
ny dyskietki, a program będzie kontynuowany dopiero 
po naciśnięciu dowolnego klawisza. 


FOR %%zmienna IN (lista argumentów) DO zlecenie 

Instrukcja: FOR umożliwia powtarzanie tego samego 
zlecenia dla pewnego zestawu argumentów i poza nazwą 
niewiele ma wspólnego z analogiczną instrukcją języka 
BASIC, Pascal, € czy CLIPPER. Nazwa zmiennej może 
być dowolnym znakiem, poza cyframi 0. .9. W miejsce tej 
zmiennej, zapisanej w instrukcji, podczas przetwarzania 
wsadowego będą kolejno podstawiane parametry z listy 
argumentów. W przypadku, gdy któryś z argumentów 
jest szablonem nazwy pliku, zawierającym znaki zastęp- 
cze (np. TEST.x lub PROGx.PAS), to w instrukcji 
zostaną podstawione kolejno wszystkie pliki kavilogu 
roboczego, zgodne z tym szkieletem. Instrukcji FOR 
w pliku wsadowym nie można zagnieżdżać (instrukcja 
FOR nie może wystąpić po DO jako zlecenie wewnętrzne 
w innej instrukcji FOR). Przykład: 


FOR ŻŻx IN (RAPORT. TXT MELDUNEK. TXT NOT. TXT) DO TYPE Z/x 


W powyższej instrukcji zmienna % %x przyjmie kolej- 
no nazwy plików, wyspecyfikowanych na liście, w wyniku 
czego na ekran konsoli zostanie wyprowadzona zawar- 
tość wszystkich trzech plików. Inny przykład: 


FOR x%a 1N (*. ASM, a. PAS, «. BAS) DO COPY A:/7/a C: 


Instrukcja ta spowoduje skopiowanie na dysk 4C) 
wszystkich plików z rozszerzeniami: .ASM, .PAS i .BAS, 
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zawartych w katalogu roboczym dysku <A): 
IF warunek zlecenie lub IF warunek instrukcja wsadowa 

Instrukcja: IF służy do warunkowej realizacji okre- 
ślonych zleceń. Zlecenie tzw. wewnętrzne, zawarte w in- 
strukcji IF i umieszczone po warunku, zostanie wykona- 
ne tylko wtedy, jeśli podany warunek jest spełniony 
(prawdziwy). Warunek ten może przyjąć jedną z wymie- 
nionych niżej postaci: 

ERRORLEVEL liczba 


Warunek jest spełniony wtedy, gdy ostatnio zrealizo- 
wany program przekazał kod zakończenia nie mniejszy, 
niż wynosi wartość argumentu ERRORLEVEL. Kod 
zakończenia jest przekazywany systemowi operacyjnemu 
przez kończący pracę program, a jego interpretacja może 
być różna. Trzeba spojrzeć do dokumentacji programu. 
Przyjęła się konwencja, że kod zerowy oznacza zakoń- 
czenie bezbłędne, a kody większe — zakończenie z powo- 
du błędu, przy czym poważniejszym błędom odpowiadają 
wyższe kody. Np. w TURBO-Pascalu do przekazywania 
systemowi operacyjnemu kodu zakończenia służy proce- 
dura Halt. 


tekst | = = tekst 2 


Powyższy warunek jest spełniony, jeżeli po ewentual- 
nym wcześniejszym podstawieniu parametrów aktua|- 
nych obydwa teksty są identyczne. Żaden z tekstów nie 
może zawierać dodatkowych separatorów, np. spacji. 
Oto prościutki przykład: program HASLO.BAT będzie 
kontynuowany tylko po podaniu w linii zlecenia właś- 
ciwego hasła, tzn. po zleceniu: HASLO nowicjusz. 


ECHO OFF 
1F zx! --nowicjusz GOTO DALEJ 
GOTO KONIEC 

: DALEJ 


: KONIEC 


instrukcje 


EXIST Dysk: ścieżkaynazwa pliku.rozszerzenie 

Warunek jest spełniony, jeśli plik o podanej specyfika- 
cji został odnaleziony. 

Przed każdym warunkiem można umieścić operator 
negacji logicznej NOT, odwracający warunek, np. 
z dwóch poniżej podanych instrukcji warunkowych wy- 
konana zostanie tylko jedna (makroasembler MASM 
podaje kod zakończenia 1 i w razie wykrycia błędów 
w asemblowanym programie): 


HASM Ż1,,,: 
1E ERRORLEVEL 1 ECHO Wykryto blad - koniec pracy 
IF NOT ERRORLEVEL t ECHO Praca jest kontynuowana 


Oto inny przykład: 


1F EX1ST PROGRAMi. BAS GWBASIC PROGRAHI 


Jeżeli plik: PROGRAMI.BAS znajduje się w robo- 
czym katalogu, to zostanie wywołany interpreter języka 
GWBASIC z tym plikiem w charakterze parametru. 


GOTO etykieta 
Instrukcja: GOTO pozwala na tworzenie w plikach 
wsadowych typu .BAT pętli, obejmujących wiele zleceń. 
Powoduje ona skok bezwarunkowy do linii pliku wsado- 





wego następującej po wymienionej etykiecie. Aby uzys- 
kać instrukcję skoku warunkowego, należy użyć instruk- 
cji GOTO w instrukcji warunkowej IF. Oto przykład: 


: PETLA 
TYPE KOMENT. TXT 
REM TO JEST PRZYKLAD PETL1I w PRZETWARZANIU WSADOWYM 
GOTO PETLA 


Powyższy plik wsadowy będzie cyklicznie listować na 
konsolę zawartości pliku tekstowego: KOMENT.TXT, 
na przemian z napisem: TO JEST PRZYKLAD PETLI 
W PRZETWARZANIU WSADOWYM. Warto zapa- 
miętać, że w pliku wsadowym etykieta jest poprzedzana 
znakiem dwukropka (:) i musi występować w linii samo- 
tnie. 


SHIFT 


Instrukcja: SHIFT pozwala użyć w pliku wsadowym 
większej liczby parametrów rzeczywistych niż 10 oraz 
rozwiązać problem zmiennej liczby parametrów. Nor- 
malnie liczba parametrów rzeczywistych jest ograniczona 
liczbą zmiennych: %0..%9. Pierwszych dziesięć para- 
metrów aktualnych jest przypisywanych zmiennym 
%0 do %9, dla reszty brak zmiennych roboczych. Wobec 
tego zlecenie SHIFT „,.przesuwa” zbiór parametrów ak- 
tualnych o jedną pozycję w lewo: pierwszy parametr 
rzeczywisty jest odrzucany, drugi zajmuje miejsce pierw- 
szego, trzeci — miejsce drugiego, ..., jedenasty wchodzi 
na miejsce dziesiątego i jest przypisywany zmiennej 9. 
Używając wielokrotnie zlecenia SHIFT, można udostęp- 
nić kolejne parametry. Przykład: Plik ZADANIE.BAT 
wywołano z konsoli w sposób następujący: 


A> ZADANIE NOTATKA KOMENT TEKST DANE 


Przypuśćmy, że plik ZADANIE.BAT zawierał na- 
stępujący program przetwarzania wsadowego: 


TYPE /1. TXT 
SHIFT 
TYPE /1. TXT 
SH1FT 
TYPE /1. TXT 
TYPE /2. TXT 


W efekcie zostaną kolejno wylistowane cztery pliki: 
NOTATKA.TXT, KOMENT.TXT, itd. Poniższy pro- 
gram wsadowy umożliwia natomiast wylistowanie dowo- 
lnej liczby plików z rozszerzeniem .TXT: 


ECHO OFF 
: PETLA 
TYPE 7/1. TXT 
SHIFT 
JF EXIST %1. TXT GOTO PETLA 


Ten sam program wsadowy można było oczywiście 
zapisać inaczej. np. tak: 


ECHO OFF 
; PETLA ż 
SHIFT 
1F NOT EXIST 70. TXT GOTO KONIEC 


TYPE 20. LST 
GOTO PETLA 
: KONIEC 


Na zakończenie przedstawimy dwa przykłady kom- 
pletnych programów wsadowych, przeznaczonych do 
automatycznej instalacji oprogramowania. Pierwszy ma 
zainstalować na dysku sztywnym wyimaginowany system 
KAKTUS, dostarczony na dyskietkach. W tym celu 
program zakłada na dysku sztywnym podkatalog KAK- 
TUS, po czym przystępuje do kopiowania, za każdym 
razem prosząc użytkownika o wsunięcie właściwej dys- 
kietki. Jak skontrolować, czy użytkownik wsunął właś- 
ciwy dysk? Najprościej zbadać, czy na dysku tym znajduje 
się określony plik. Przyjmujemy, że na dyskietce 
KAKTUS__A występuje m.in. plik KAKTUSI.COM, 
a na dyskietce KAKTUS__B — plik KAKTUS.OVL. 
Program wsadowy będzie powtarzał prośbę o wsunięcie 
właściwej dyskietki aż do skutku: 


ECHO OFF 
c: 


HDYKAKTUS 
CDNKAKTUS 
;PETLA1 
ECHO Wsun do stacji [A| dyskietke KAKTUS A 
PAUSE 
IF NOT EXIST A: NKAKTUS1. COM GOTO PETLA1 
COPY A:Na. 2a 
; PETLA2 
ECHO wsun do stacji [A] dyskietke KAKTUS_B 
PAUSE 
1F NOT EXIST A: NKAKTUS. OVL GOTO PETLA2 
COPY. A:Xx. 2 


Oto przykład bardziej złożony pliku wsadowego, 
służącego do instalacji polskojęzycznego pakietu adap- 
tacyjnego POLONUS do dBASE III Plus. Istota 
instalacji polega na skopiowaniu jednego z dwóch pli- 
ków: POLONUS.CGA lub POLONUS.HGC do pliku 
POLONUS.COM. Należy przy tym wykryć ewentualne 
błędy i udzielić użytkownikowi wskazówek: 


ECHO OFF 

REM x: Roland Wacławek, Siemianowice Sl. 11 stycznia 1988 aa 
CLS 

ECHO Program zainstaluje pakiet POLONUS dla karty graficznej 
ECHO CGA albo dla monochromatycznej karty graficznej HERCULES 
FOR /4x 1N (HGC hbgc CGA cga) DO IF [721]--[Z%%m)j GOTO POPRAWNE 
ECHO Musisz podac zlecenie: INSTALUJ HGC dla karty Hercules 
ECHO albo zlecenie: INSTALUJ CGA dla karty grafiki barwnej 
GOTO KONIEC 

: POPRAWNE 

1F EXIST exist polonus. 41 GOTO jest 

ECHO Na dysku brak kompletnego zestawu plikow instalacyjnych! 
GOTO KONIEC 

: JEST 

GOTO KARTA/1 

:KARTACGA 

COFY polonus. cga polonus. com >nul 

ECHO Pakiet POLONUS zainstalowany dla karty grułiki barwnej 
GOTO KONIEC 

: KARTAHGC 

COPY polonus. hgc polonus. com >nul 

ECHO Pakiet POLONUS zainstalowany dla Karty Hercules 

KONIEC 


Instrukcja FOR służy tutaj do sprawdzenia, czy para- 
metr istnieje i czy jest jednym z dopuszczalnych słów: 
CGA lub HGC (należy przewidzieć przypadek wypisania 
parametru małymi lub dużymi literami). Klauzula: >nul, 
zawarta w zleceniu COPY, przełącza strumień danych, 
kierowanych pierwotnie do monitora, do urządzenia 
pozornego (zerowego) NUL. Sprawia to, że na ekranie nie 
ukażą się komunikaty wyprowadzane przez zlecenie. 
Sztuczkę tę można zresztą stosować także w innych 
zleceniach PC-DOS, kiedy trzeba stłumić wyprowadzane 
przez nie meldunki. 








ANDRZEJ M. GROSSMAN 


PROCEDURY ZE ZMIENNYMI LOKALNYMI 
'W BASIC ZX SPECTRUM 


O tym, że możliwość korzystania z procedur ze zmien- 
nymi lokalnymi znacznie ułatwia pisanie programów, nie 
trzeba chyba nikogo przekonywać. Procedury są dostęp- 
ne w wielu językach wysokiego poziomu, a ostatnio, 
wiele dialektów języka BASIC wzbogaciło się o to 
pożyteczne narzędzie. Nawet poczciwe Spectrum 
dysponuje procedurami w dialektach Beta-BASIC 3.0 
i Mega-BASIC, które, poza szeregiem zalet, mają niestety 
podstawową wadę — zajmują pokaźną część dostępnej 
dla programisty pamięci komputera. 

Chcąc adaptować długie programy z języka Fortran 
musiałem sobie jakoś poradzić i tak powstał prezen- 
towany tu PROCLOK. Od prawie dwóch lat pracuję 
z jego nieco uproszczoną wersją i na ogół spełnia dobrze 
swoje zadania. A że Spectrum nie nadaje się do tzw. 
poważnych zastosowań? Możliwe, ale instytucji w której 
pracuję jakoś nie stać było przez długi czas na kupno 
IBM-a i podejrzewam, że nie jest to przypadek odosob- 
niony. 

Oczywiście, jeżeli piszecie niezbyt długi program i wy- 
starczy Wam mniejsza dokładność obliczeń (czterobaj- 
towa reprezentacja liczb), zdecydowanie polecam Pascal, 
a PROCLOK niech będzie po prostu okazją do po- 
grzebania w procedurach systemowych. 

PROCLOK zajmuje 605 bajtów od adresu 64763 do 
początku UDG i nie jest relokowalny. Korzystanie 
z niego ułatwią, mam nadzieję, załączone przykłady. 
Poniżej podaję nieco szczegółów. 

Przed wczytaniem z taśmy wygenerowanego przez 
loader kodu maszynowego trzeba wykonać CLEAR 
64762. 
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Program w języku BASIC przed pierwszym wywoła- 
niem procedury musi, przy każdym uruchomieniu, wyko- 
nać RANDOMIZE USR 64763. Sposób deklaracji pro- 
cedury 

nr linii REM PROC nazwa 

nr linii REM [lista1; lista2] 


nr linii RETURN 

Procedury lepiej umieścić na początku programu, gdyż 
szybciej są znajdowane przez PROCLOK. 

Wywoływanie procedury 

..GO SUB PROC nazwa: REM [lista3; lista4] 

(w jednej linii) 

Słowo zastrzeżone PROC — dużymi literami. Nazwa 
o dowolnej długości dużymi lub małymi literami — w tym 
przypadku są rozróżniane! Pierwszy znak nie może być 
cyfrą. 

Listy parametrów są opcjonalne. Wartości parame- 
trów umieszczonych za średnikiem są przekazywane 
z powrotem do programu wywołującego procedurę. 
W przypadku braku list I i 3, zaraz po nawiasie nale- 
ży umieścić średnik. Jest również dopuszczalny zapis 
[lista2; lista2] oraz [lista4; lista4], ale niepotrzebnie wy- 
dłuża to deklarację i opłaca się tylko w przypadku 
szybkiego przepisywania zmiennych, o czym dalej. 

W listach parametrów mogą występować tylko zmien- 
ne. Nie można używać liczb, wyrażeń i funkcji. Tablice 
liczbowe i alfanumeryczne oraz proste zmienne alfa- 
numeryczne przekazywane są tylko w całości. 


Tabela 1 


Wpływ struktury list na wartości zmiennych 





Długość przekazywanych prostych zmiennych alfa- 
numerycznych musi być równa długości zmiennych przyj- 
mujących wartości. (Procedura nie może zmieniać „,wy- 
miarów” zmiennych). W listach parametrów w procedu- 
rze można stosować tylko nazwy jednoliterowe. 

Zasady nazewnictwa zmiennych prostych jak w BASIC 
ZX Spectrum, natomiast po nazwach zmiennych ta- 
blicowych stosuje się puste nawiasy bez indeksów np. 
a(), B$(). 

Zmienne występujące w liście parametrów przy wywo- 
łaniu procedury, muszą na danym poziomie być dostępne 
(deklaracja LET, DIM FOR. . lub przekazanie z poprze- 
dniego poziomu). 

Nie istnieją zmienne globalne, dostępne z procedury. 
Parametry można przekazywać tylko z i do procedur 
mających bezpośrednio sąsiadujące obszary zmiennych. 
Zmian zmiennych na innych poziomach można dokony- 
wać tylko przekazując zmienne kolejno na poziomy 
pośrednie, co niestety dodatkowo zajmuje pamięć, zwła- 
szcza w przypadku tablic. 


Zmienne typu FOR...NEXT przekazywane są jako 
zmienne proste do procedury i mogą przyjmować warto- 
ści zmiennych prostych z procedury. Nie można nato- 
miast przekazywać zmiennych typu FOR...NEXT z pro- 
cedury. 

W przypadku powtarzania się nazw zmiennych otrzy- 
mać można różne efekty, w zależności od tego, w którym 
miejscu list zmienne te są wyszczególnione. Przykłady 
zawiera tablica 1. 

Z procedury można wyjść tylko przez RETURN (GO 
TO może wprowadzić straszny bałagan) lub zatrzymać 
program przez użycie STOP, czy BREAK, ale użycie 
CONTINUE nie uruchomi wtedy prawidłowo progra- 
mu. 

Szybkie przepisywanie zmiennych 

W języku BASIC dla ZX Spectrum można przypisać 
np. zmiennej prostej A wartość zmiennej B stosując 
LET A=B. PROCLOK umożliwia podobną operację 
również dla całych tablic. W tym celu trzeba np. wykonać 
GO SUB PROC PRZEPISZ:REM [A(); B()], a procedura 
może mieć postać: 

REM PROC PRZEPISZ 

REM [AQ; AO] 

RETURN 
Oczywiście jedna procedura może przepisać więcej tablic 
zarówno liczbowych, jak i alfanumerycznych. 


1 
lista przy -i lista OTACZA 
wywołaniu  : w procedurze : w procedurze 3 po powrocie 
ami i io ta Gi GA PO AA ÓRAGY || RPRZEPEY JWINIE RABLRy.| || WAEWIEEMNZIMENPE RER kpc ZSZ || |NMĄDĄPIPM MO RR pW A= 
[A,A,X1I ż [M,N.U] !'  M=A,N=A,U=X !'  AZĄ,X=X 
[A:A] : [M:N] !  M=A,N=A E =N 
TA.B:G.DI ś f[K,M:M.M] '  K=A.M=B Cpierw- i A=A.B=B,C=M 
: 1 sze przypisanie> !: D=M 
[A;A,AI : EK:MOWJ !  K=A,M=A,N=A !'  A=N (ostatnie 
: . ' przypisanie)» 
1 i ' 














Sygnalizacja błędów 
Zastosowałem bardzo uproszczoną analizę składni, 
w związku z czym interpreter nie sygnalizuje następują- 
cych błędów: 
1 


Rys. Organizacja obszaru zmiennych 


: Zmienne ę 


s Nr linii z listą i 
' parametrów PROC 
; Wartość CVARS) ż 
| poziomu podstawowego $ 


Mm 
N 
© 





: Nr linii z listą ę 
ź parametrów PROC 2 k 


I 
I 
| 
l 
l 
I 
l 
I 
l 
l 
I 
l 
I 
l 
l 
l 
l 
I 
1 
l 
l 
l 
I 
l 
I 
2 do 00 20 om ow Gm 00 owad 


Wartość CVARS) > 
PROC 1 ł 


Nr linii 
parametrów 


: Wartość 
: PROC n-1 5 


;<--ELINE 


: BUFOR EDYTORA : 





130 OOOO CK OCH KOKO COOK 
, PĘOCLOK 1.1 

; A.M GROS=SMAN 1988 

GU ZOKOŚCĄCEOŚH HKO ACC AHAOCAOCAOOCE 


40 
SU 


64763 


xk  INICJALIZACJA *otok 


HL ,C23627> 
CVARSO0) .HL 
HL.€23613) 
DE .OBSLBL 
CHLD>.E 
HL : 
<HL>.D 


200 »*ooiok PROGRAM GLOWNY *otołok 


ro ORG 
90 

100 

110 INIC LD 
120 LD 
130 LD 
140 LD 
150 LD 
160 INC 
170 LD 
180 RET 
190 

210 OB=LBL 

220 DEC 
230 DEC 
240 LD 
250 GP 
260 JR 
270 LD 
280 LD 
290 SBC 
300 JR 
310 LD 
320 GALL 
330 GALL 
340 CALL 
350 JR 
360 BVAR GP 
370 JR 
380 LD 
390 P1 LD 
400 DEC 
410 GP 
420 JR 
430 CP 
440 JR 
450 INC 
460 GALL 
470 JR 
480 GALL 
490 GALL 
500 CALL 
510 GALL 
520 LD 
530 EX 
540 ING 
550 LD 
560 PUSH 
570 PUSH 
580 LD 
590 CALL 
600 BAS LD 
610 SET 
620 UP 
630 KOMELD 
640 JR 
650 INC 
660 INC 
6r0 JP 
680 


690 
700 
710 
720 
730 
740 
750 
760 
rrvo 
780 
. 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 


LD CIY+71>,0 
SP 

SP 
A,C23610> 
22 

NZ .BVAR 

HL ,C23618) 
BC.10000 
HL „BC 

NZ „,KOMBLD 
CIY+71)>.128 
PRZEKZ 
LIKW 
4£1F23 

BAS 

£ 

NZ „KOMBLD 
HL ,C23645) 
A ,CHL2> 

HL 

165: RND 
C.P1 


"237; GO SUB 


NZ ,KOMBLD 
HL 

LPROC 

NZ .KOMBLD 
42D2B 
£1EED 
TWORZ 
PRZEKZ 
H.1 

<SP)> .HL 
SP 

BC .10000 
BC 

HL 
<23613) ,SP 
£L1FO5S — 3 
CIY+0>.*FF 
T.CIY+1) 
41B7D 
GALL LIKW 
C,KOMBLD 
SP 

SP 

41303 


HOHO HOOK KOOOOC HOC AOOŁOŁOOŁOOK 
"Pp QD PREOGRAKYT* 


» SZUKANIE PROCEDURY »* 


LPROCG INC 
LD 
LD 
CALL 
RET 
LD 

LINREM 
GALL 
JP 
INC 
LD 
GALL 
JR 
LD 
CP 

NASTP EX 
LD 
ING 
GALL 
EX 
JR 


HL 

423629) „HL 
DE , WZOR 
PORWN 

NZ 

HL ,C23635> 
LD E.234 ;REM 
%1D8B+1 
G.$1BEC 

HL 
DE,€236292> 
PORWN 

NZ .NASTP 
A.13; ENTER 
CHL) 

AF „AF ” 

HL ,C236182> 
HL 

£196E 

AF „AF * 
NZ,LINREM 


930 

940 

950 

960 

970 

980 

990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 


LD 
INC 
LD 
RET 


B.CHL> 
HL 
C.CHLD> 


%xPOROWNANIE NAZW» 


PORWN LD 
CP 
RET 
[e 
RET 
GP 
RET 
INC 
ING 
JR 


A.,CDE) 


z 

13; ENTER 
A 

CHL) 

NZ 

HL 

DE 

PORWN 


»PRZEPISYWANIE ZMIENNYCH»* 


PRZEKZ 
DEC 
DEC 
DEC 
LD 
DEC 
LD 
EX 
CALL 
CALL 
RET 
INC 
INC 
GALL 
LD 
LD 
RES 
CALL 
PUSH 
LD 
CALL 
LD 
LD 
PUSH 
CALL 
GALL 
LD 
LD 
CALL 
JP 
PUSH 
BIT 
JR 
SET 
GALL 
LD 
GALL 
POP 
POP 
XOR 
JP 
LD 
XOR 
AND 
JR 
PRZEP POP 
JR 
LD 
BIT 
JR 


ZMNL 


BEZZM 


PRZEPO 

BIT 
LD 
GALL 
POP 
PUSH 
PUSH 
PUSH 
BIT 
JR 
PUSH 
LD 
CALL 
EX 
XOR 
SBC 
JR 
POP 
POP 


JR 


LD HL,C236272 
HL 

HL 

HL 

D.CHL) 

HL 

E.CHL2 

DE „HL 
4196E 
LISTA 

NZ 

CIY+10) 
CIY+13) 
ZMNNUM 

HL ,CPOCZML> 
423645) .HL 
0.C1Y+71) 
4*28B2 

AF ;CF 
(23629) „HL 
SKLD 
CPOCZML) „HL 
B.A 

BG 

PPOZ 
ZMNNUM 

HL , CPOCZMP> 
€23645) „HL 
*28B2 
C.41C2E 

HL 

5.6 
Z,BEZZM 
6,0 

SKLD 
CPOCZMP) „HL 
LPOZ 

HL 

DE;E 

D 

NZ „BLADE 
A,G 

E 
%11100000 
NZ ,BLADQ 
AF 
C.PRZEPO 
A,D 

7 ,CIY+71) 
Z.KNGLST 
PUSH DE 
5,6 

BC.6 
Z,419B8 

DE 

BG 

HL 

DE 
7,CIY+71) 
Z.PRZEP1 
BG 

HL ,C23629) 
419B8 

CSP) „HL 

A 

HL ,BC 

NZ .BLADQ 
HL 

DE 


PRZEPZ 


1810 
1820 
1830 
1840 
1850 
1860 
1810 
1880 
1600 
1900 
1910 
1920 
1930 
1940 
1950 
1260 
1940 
1980 
1990 
2000 
2010 
2015 
2020 
2030 
2040 
20530 
2060 
20r0 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2545 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 


PKZEPI LD Hl.. 423041) 
DEC HL. 
GALL 41655 
INC HL 
Por DE: 
LD CHL>.E 
EX CZP) „HL 
FKZEŁZ LD A.D 
FOr Dł. 
POP 5 
INC HL 
ING DŁ 
DEC BG 
LDIR 
KNGLST CR" UUY 
JF NZ. ZMNL 
KONIEC RET 
EKLALO RK=T a 
BEFB. 25 
DEZZUKANIE FOCZATKOW LIST 
FARAMETROW * 
LISTA INC HiL. 
INC Ki 
INC Hi 
GALL, CZY£EMŃ 
PUSH AF 
LD CFOCZMŁO .HL 
LD HL.4253613> 
INC HL 
TNC HL. 
LD ELCHLI 
INC HL 
LD D. CHL> 
INC Hi 
PUSH: BL 
EX DE: - HL, 
CALL  41975E 
POP BC 
LD E.0 
LD A. CHG) 
LD D.A 
GALL 7198Bb-3 
CALL  CZYREM 
LD CPFOCZMP > -HL 
JR NZ.LISTAL 
POP AF 
RET z 
JR ELADE 
LISTAL FOP AF 
RET NZ 
BLADE R=T 8 
DEFB +40D 
SZUKANIE "REM LV Lo": 
CZYREM INC HL 
LD DE. WZORZ 
CALL  PORWN 
RET NZ 
LD A. CHL.> 
GP SE 
JR Z.SKEDN1 
XOR A 
BIT ryGLYFTNY 
RET iż 
SRKEDN LD A.CHL) 
CP ot 
SREDN1 INC HL 
RET z 
CP "1" 


JR NZ.SKEDN 
AND A :Z=0 


RET 
*ZAMIANA PPG i NEWPPC. 
SUBPPC i NSPPG aj 
ZMNNUM LD B.3 
LD HL.23621 
LD DE „23618 
ZMNNU1 LD C.CHL> 
LD A,CDE> 
LD CHL>.A 
LD A.C 
LD CDE>.A 
INC HL 
ING DE 
DINZ ZMNNU1 
RET 


2680 *KONTROLA SKLADNI I UZUP 2970 INC HL 3280 CALL 4£19E5 
2685 ;BITU 7 TYPU ZMIENNEJ »*L2600 2980 LD CHL).128 - 3290 SCF 
2690 SKLD RST 418 2990 INC DE 3300 RET 
2700 A CP *ę* 3000 PUSH DE 3310 
2710 JR Z.SET 3010 INC HL 3320 *POPRZEDNI POZIOM* 
2720 CP g" 3020 LD DE ,C23618> 3330 PPOZ SET  0.CIY+71) 
2730 > JR NZ,SKLD2 3030 LD CHL) .E 3340 PPOZ1 LD HL ,€23627> 
2740 RST 420 3040 INC HL 3350 LD 4VARST> „HL 
2750 CP 0 3050 LD CHL> „D 3360 DEC HL 
2760 JR NZ ,SKLD1 3060 INC HL 3370 LD D.CHL) 
2740'5ET) -4SBDOHĘ>G 3070 LD DE ,€236272) 3380 DEC HL 
2780 RST 420 3080 LD CHL> „E 3390 LD E.CHL> 
2790 CP >» 3090 INC HL 3400 'LD €23627) „DE 
2800 JR NZ ,BLADSK 3100 LD _ CHL>.D 3410 RET 
2810 SKLD1  RST 420 3110 POP HL 3420 
2820 SKLD2 INC HL - 3120 LD €23627) „HL 3430 %*POWROT DO POZ. LOKALNEGO» 
2830 CP SM 3130 RET 3440 LPOZ LD HL , CVARST> 
2840 RET /Ż 3140 3450 LD €23627) .HL 
2850 CP s 3150 *LIKWIDACJA ZMIENN. LOK. * 3460 RES  0,CIY+71) 

_ 2860 RET Z 3160 LIKW BIT  O,CIY+71) 3470 RET 
2870 CP sA: 3170 CALL NZ,LPOZ- 3380 
2880 RĘT  Ż 3180 LIKW1 LD DE , CVARSO2 3490 *%okPAMTEC PROGRAMU»ołok 
2890 BLADSK RST 8 3190 LD HL ,C23627) 3500 VARSO o DEFW 0 
2900 DEFB 40B 3200 . XOR A 3510 VARST  DEFW 0 
2910 3210 SBC  HL.DE 3520 POCZML DEFW O 
2920 *LOKALNY OBSZAR ZMIENN. % 3220 RET Z 3530 POCZMF DEFW O 
2930 TWORZ LD HL.C23641) 3230 CALL PPOZ1 3540 - 
2940 DEC HL 3240 DEC HL 3550 »*łe<VWZORY DLA PORWN»okk 
2950 LD BC.5 3250 DEC HL 3560 WZOR DEFM "PROC :" 
2960 CALL 1655 3260 LD DE .,C23641) 3570 WZORZ  DEFB 234,"[",':"' 

3270 EX DE .HI. 


Nie ma informacji o powtórzeniu się nazw procedury. 
Pod uwagę brana jest tylko pierwsza. 

W przypadku wystąpienia więcej niż jednego średnika 
w listach parametrów też uwzględniany jest tylko pierw- 
szy. 

Sygnalizowane są następujące błędy: 
2  Variable not found — dla listy parametrów przy 
wywołaniu procedury 
— w programie wywołującym nie występuje taka 
zmienna 
jw — dla treści procedury 
— nie przekazano zmiennej do procedury 


4  Outofmemory— zmienne nie mieszczą się w pamięci 
C Nonsense in BASIC — błąd składni w liście parame- 
trów 
E  Outofdata — dla listy parametrów przy wywołaniu 
procedury 
— jedna z list parametrów jest za krótka lub nie 
istnieje 


— brak nawiasów [ lub ] w jednej z list 
— średnik w listach na różnych pozycjach 
jw. — dla RETURN 
— brak średnika na początku jednej z list 
N Statement lost — dla linii z wywołaniem procedury 
— brak procedury o takiej nazwie 
— po deklaracji nazwy procedury występują w tej 
samej linii dalsze instrukcje lub lista parametrów 
Q  Parameter error — dla linii z wywołaniem procedury 
— niezgodność typów zmiennych w listach 
— wieloliterowa nazwa w liście parametrów w pro- 
cedurze 
jw. — dla RETURN 
— procedura zmienia „wymiary” łańcucha lub ta- 
blicy, albo usiłuje przekazać zmienną typu 
FOR...NEXT 
UWAGA! 

Program zmienia adres procedury obsługi błędu i bę- 
dzie kolidował z innymi programami działającymi na tej 
samej zasadzie. W przypadku wystąpienia komunikatu 
o błędzie (także: O.K., STOP, BREAK), likwidowane są 
wszystkie obszary zmiennych lokalnych oraz przywraca- 


ny jest standardowy adres procedury obsługi błędu. 
W trakcie pracy program wykorzystuje komórkę pamięci 
o adresie 23681. 


Zasada działania programu 


Organizacja obszaru zmiennych podczas korzystania 
z procedur przedstawiona jest na załączonym rysunku. 
Jest to, jak widać, wielokrotne powielanie organizacji 
obszaru zmiennych interpretera języka BASIC ZX Spec- 
trum, z tą niewielką różnicą, że po znaczniku końca 
obszaru zmiennych (128) wykorzystano cztery bajty na 
pamięć pomocniczą lokalną, która zawiera numer linii 
z listą parametrów w procedurze i adres początku obszaru 
zmiennych poprzedniego poziomu. Konstrukcja taka nie 
limituje głębokości zagnieżdżeń w procedury, pozwala na 
łatwy powrót do poprzedniego poziomu, a interpreter 
wykonuje procedurę jak normalny program. Ingerencja 
potrzebna jest tylko w momencie wywołania oraz po- 
wrotu z procedury i w tym celu został wykorzystany 
mechanizm obsługi błędu. 


Szczupłe ramy „„InforMika” zmusiły mnie do usunięcia 
komentarzy w listingu programu źródłowego i zamiesz- 
czenia jedynie krótkich objaśnień w tekście. Bliższe dane 
na temat wielu procedur i zmiennych systemowych 
wykorzystywanych przez PROCLOK można znaleźć 
w następujących pozycjach: 

„Przewodnik po ZX Spectrum” — K. Kuryłowicz, 

D. Madej i K. Marasek; 

„Tajniki ZX Spectrum” — A. Kadlof; 

„The Complete Spectrum ROM Disassembly” — 1. 

Logan, F. O'Hara. 

Uwagi do listingu — w nawiasach podano numery linii 

INICJALIZACJA (100—160) — zapamiętuje adres po- 
czątku obszaru zmiennych ZX Spectrum w zmiennej 

VARSO i zmienia wartość zmiennej systemowej 

ERR__SP, czyli adres procedury obsługi błędów na 

adres OBSLBL 
OBSLBL (210—670) — główny program obsługi błędów 

uruchamiany w przypadku wystąpienia błędu w trak- 
cie wykonywania programu w ZX BASIC. Kod błędu 
pobierany jest ze zmiennej systemowej ERR__ NR 


9 


(240). Jeżeli jest różny od 22 lub 1, następuje skok do 

linii 630, wywoływana jest procedura likwidująca 

ewentualne obszary zmiennych lokalnych i wykonywa- 
ny jest skok do systemowej procedury obsługi błędów 

(670). 

Interpreter języka BASIC ZX Spectrum wywołanie 
procedury: GO SUB PROC nazwa traktuje, jak od- 
wołanie się do nie istniejącej zmiennej PROC nazwa 
i sygnalizuje błąd | — Variable not found. Procedura 
sprawdza (380—440) czy przed nazwą zmiennej wy- 
stąpiło GO SUB. Jeżeli tak, wywoływana jest procedura 
szukająca w liniach programu w. języku BASIC żądanej 
deklaracji (460), numery linii i instrukcji, do których ma 
nastąpić powrót z procedury, przekazywane są na stos 
GO SUB (480—490). Następnie tworzony jest obszar 
zmiennych lokalnych (500) i zmienne zostają przekazane 
do tego obszaru (510). 

Na stos GO SUB przekazywany jest numer nie ist- 
niejącej linii 10000 oraz instrukcji I (520—570) i na- 
stępuje powrót do interpretera języka BASIC w celu 
wykonania żądanej procedury. Po napotkaniu instrukcji 
RETURN interpreter pobiera ze stosu GO SUB nr linii 
10000 i sygnalizuje błąd 22 — Statement lost, gdyż 
numery linii w programie mogą przyjmować wartości do 
9999. 

Procedura obsługi błędów sprawdza, czy błąd nr 22 
został spowodowany właśnie taką sytuacją i jeżeli tak, to 
do programu wywołującego przekazywane. są wartości 
zmiennych lokalnych (250—300), a ze stosu GO SUB 
pobierane są właściwe numery linii oraz instrukcji, do 
których ma nastąpić powrót (340) i przekazywane do 
interpretera. 

LPROC (720—950) — sprawdza czy po GO SUB użyto 
słowa zastrzeżonego PROC, jeżeli nie, następuje po- 
wrót z wyzerowanym wskaźnikiem Z. W przeciwnym 
przypadku wyszukiwane są kolejne linie z REM 


(760—800) i tekst za REM porównywany jest z nazwą - 


wywołanej procedury (830—840, 870—920). Po znale- 
zieniu ustawiany jest wskaźnik Z, a rejestry BC zawie- 
rają nr linii z listą parametrów procedury, jeżeli nie 
znaleziono procedury — komunikat Statement lost 
(800). : 

PORWN (990—1080) — porównuje łańcuchy znaków 
o adresach w DE i HL. Koniec łańcucha oznaczają 
kody 13 lub 58. W przypadku zgodności łańcuchów 
wskaźnik Z= |. 

PRZEKAZ (1110—1990) — sprawdza poprawność skła- 
dni list parametrów, zgodność typów zmiennych, two- 
rzy i likwiduje obszary zmiennych lokalnych, przeka- 
zuje zmienne między obszarami. Bit 7, (TY +71) pełni 
rolę wskaźnika. TY zawsze = 23610. W przypadku 
wyzerowanego bitu 7 tworzony jest nowy obszar 
zmiennych i przekazywane są tam wartości zmiennych 
z programu wywołującego, jeżeli bit 7 = l, zwracane są 
z procedury wartości zmiennych umieszczone na liście 
za średnikiem. 

LISTA (2020—2320) — wykorzystywana przez PRZE- 
KAZ do lokalizacji list parametrów w wywoływanej 
procedurze i w instrukcji wywołania. Wskaźnik Z= 1 
świadczy o braku obu list, przy braku jednej — komu- 
nikat Out of DATA. 

CZYREM (2350—2520) — wykorzystywana przez pro- 
cedurę LISTA do ustawienia HL na adres pierwszego 
znaku nazwy pierwszej zmiennej w liście, kiedy bit 7, 
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10 REM. »eeefeee wi C EE NEC ECCE 


20 REM »* PROCLOK 1.1 je 
30 REM »* A.M.Grossman 1988 % 
40 REM »* loader >< 


50 REM. *ofojootOkAHOKCH AK ACEHCĄCHCHOCĄCHK 

60 CLEAR 64762: LET A=64763: FO 
R I=1 TO 25 

70 READ L$: LET L=LEN L$: LET S 
=0: LET K=2 

80 LET A$=L$CK-1): LET B$=L$CK) 


90 LET C=CCODE A$-48-C7%CA$>": " 
222*%x16+CODE B8-418-€7%CB$>'"': "> 
100 IF K<L THEN POKE A,G: LETS 
=S+C€: LET K=K+2: LET A=A+1: GO TO 
80 
110 IF S-256*INT (S/256)<>C THEN 
PRINT "BLAD W LINII ":I: STOP 
Ł20 NEAL 1 
130 DATA '"2A4B5C2247FF2A3D5C110B 
FD73237209FD3647003B3B3A3ASCAG ' 
140 DATA '"FE1620192A425C011027ED 
42204DFD364780GDB8FDCDOSFFCDO6 
150 DATA '"231F1833FE01 203A2A5D5C 
7E2BFEAS38FAFEED202D23CD79FDES'"' 
160 DATA "2027GD2B2DCDED1ECDE4FE 
CDB8FD2601E333011027C5E5SED73F4"' 
170 DATA "3D5CCDO021FFD3600FFFDQCB 
01FEC37D1BCDO8FF38FB3333G3030E'"' 
180 DATA "'1323224D5C114FFFCDABFD 
C02A535C1 EEAGD8C1 DDAEC1B23EDDD"' 
190 DATA "5B4D5SCCDABFD20033E0DBE 
082A4125C23CD6E190820E046234EAB" 
200 DATA "C91AFE3AC8FEODG8BECO023 
1318F32A4B5C2B2B2B562B5SEEBCD5SE" 
210 DATA "6E19CD62FECOFD340AFD34 
ODGDBOFE2A4BFF225D5CFDCB47864C" 
220 DATA "CDB228F5224D5CCDCZFE22 
4BFF47C5CD29FFCDBOFE2A4DFF2274" 
230 DATA "5D5CCDB228DA2E1CE5CB69 
2802CEF1CDC2FE224DFFCD3CFFE16T"' 
240 DATA "D1AAC290FE79ABE6E02047 
F138077AFDCB477E2837D5CB6901BC"' 
250 DATA "0600CCB819D1C5E5DSFDGCB 
477E2811C52A4D5CCDB819E3AFEDGE" 
260 DATA '"42201DE1D1180B2A595C2B 
GD551623D173E37AD1C123130BED1A" 
270 DATA "BOFE5DCZ2CFFDC9CF192323 
23CD92FEF5224BFF2A3D5C23235ED8" 
280 DATA "235623E5EBCD6E19C11E00 
0A57CD8819CD92FE224DFF2004F141E" 
290 DATA *"C81802F1COCFOD231155FF 
CDABFDCOTEFE3B2809AFFDGCB47TES50O"' 
300 DATA "C8TEFE3B2Z3C8FESDZOFTAT 
C9060321455C11425C4E1A77791230" 
310 DATA '"231310F7C9DFFE282809FE 
24200DE7FE282007CBF9E7TFE2920B1" 
320 DATA "OBET23FE2CC8FE3BC8SFES5D 
180F0B2A595C2B010500CD55162370'' 
330 DATA "368013D523ED5B42507323 
7223ED5B4B5C732372E1224B5CC93G'"' 
340 DATA "FDCB4746C43CFFED5B47TFF 
2A4R5GAFEDS2C8CD2DFF2B2BED5BO0O"' 
350 DATA "595CEBCDE51937C9FDCB47 
C62A4B5C22419FF2B562B5EED534B10" 
360 DATA "5GC92A49FF224B5CFDCB47 
86C9000000000000000050524F43F2'"' 
370 DATA "203AEASB3AD9"' 


10 REM. Se%%90$% EEEE ĄCE ĄCE OCE 
20 REM »* PRZYKŁAD * 
30 REM * MNOŻENIE MACIERZY » 
40 REM *eiokfoiofoiofoFHOO CHO OOOO OOOO 
50 REM Uaktywnienie PROCLOK 
60 RANDOMIZE USR 64763 
TO GO TO 510 
80 REM *oofototok PROCEDURY »otofofofokk 
90 REM *%* WCZYTYWANIE WYMIARÓW» 
100 REM PROC WYMIARYMTX 
110 REM £:M.N,AS$] 
120 INPUT "Nazwa macierzy :";:A$ 
130 PRINT "MACIERZ *";A$ 
140 INPUT "Wymiary macierzy ";CA 
%)>'"Wierszy=":M.'Kolumn=":N 
150 PRINT "M=";M."N=";N 
160 RETURN 
170 
180 REM *WCZYTYWANIE  MACIERZY»* 
190 REM PROC WCZYTAJMTX 
200 REM [:M,N.AC)]1 
210 LET A$=" * 
220 GO SUB PROC WYMIARYMTX: REM 
[;M.N,A$] 
230 PRINT "MACIERZ "';A$ 
240 PRINT *"Wprowdzaj dane wiersz 
ami!" 
250 FOR I=1 TO M: FOR J=1 TO N 
260 INPUT CA$;I:",";J>;"=";ACI,J 
> 
270 PRINT ACI.JD>, 
280 NEXT J: PRINT 
290 NEXT I 
300 RETURN 
310 > 
320 REM « MNOŻENIE MACIERZY A*%B 
330 REM PROC MNOZENIEMTX 
340 REM [M.L,N.,AC>,BC>;CC>] 
350 FOR K=1 TO L: FOR I=1 TO M 
360 FOR J=1 TO N 
370 LET CCI.J>=CCI,JD+ACI „K>*BCK 
> J2 z 
380 NEXT J: NEXT I: NEXT K 
390 RETURN 
400 
410 REM » WYDRUK MACIERZY L. 
420 REM PROC PISZMTX 
430 REM [A8,M.N.ACD] 
440 PRINT "MACIERZ ";A$% 
450 FOR I=1 TO M: FOR J=1 TO N 
460 PRINT ACI.J>. 
470 NEXT J: PRINT 
480 NEXT I 
490 RETURN 
500 
510 REM »*ło< PROGRAM GŁÓWNY %ook 
520 REM DEKLARACJA ZMIENNYCH PRO 
GRAMU 
530 LET wierszyi=0: LET kolumni= 
o 
540 LET wierszy2=0: LET kolumn2= 
[0 
550 LET A$=" * 
560 INPUT "Maksymalny wymiar mac 
ierzy : ";MAX 
570 DIM ACMAX.MAX>: DIM BCMAX,MA 
X>: DIM RCMAX,MAX> 
580 
590 REM WCZYTANIE MACIERZY AiB 
600 GO SUB PROC WCZYTAJMTX: REM 
[:wierszyi „kolumni .AC>] 
610 GO SUB PROC WCZYTAJMTX: REM 
[;wierszy2,kolumn2 .BC>]1 
620 REM MACIERZ WYNIKOWA 
630 LET A$="R" 
640 GO SUB PROC MNOZENIEMTX: REM 
[wierszyl .kolumn1i .kolumn2 „AC) „BC 
>:RC2>1 
650 GO SUB PROC PISZMTX: REM [A% 
„WIERSZY1 „,KOLUMN2 ,RC] 
660 REM KONIEC 


10 KREM. Heko CC AOC 

20 REM * PRZYKŁAD REKURENCJI »* 

25 REM * RYSOWANIE KWADRATÓW »% 

30 REM. *>kMHHC HCO ĄCE 

40 RANDOMIZE USR 64763 

50 REM »ło< PROGRAM GŁÓWNY %otok 

60 LET X1=0: LET Y1=175: LET bo 
k=175: LET skok=10 

70 GO SUB PROC KWADRATY: REM [s 
kok .X1 .Y1 „boki 

80 STOP 

90 REM »*ołoiotok PROCEDURY  *otoofok 
100 REM T'ROC KWADRAT 

110 REM [X.Y.L1 

120 PLOT X.Y 

130 DRAW L.0: DRAW 0.-—L: DRAW —L 
,0: DRAW O.L 

140 RETURN 

150 

160 REM PROC KWADRATY 

170 REM [5.X,Y.L] 

180 GO SUB PROC KWADRAT: REM [X. 
WZEA 

190 IF L<10 THEN GO TO 220 

200 LET X=X+S: LET Y=Y-S: LET L= 
L-2*%S 

210 GO SUB PROC KWADRATY: REM [S 
KW <lal 

220 RETURN 


(TY +71) =0 lub po średniku, kiedy bit 7=1. Z=0 

świadczy, że nie znaleziono listy. 

ZMNNUM (2550—2660) — wykorzystana w procedurze 
PRZEKAZ do uaktualniania numerów linii i instruk- 
cji przez zamianę wartości zmiennych systemowych 
PPC i NEWPPC oraz SUBPPC i NSPPC. 

SKLD (2690—2900) — wykorzystana w procedurze 
PRZEKAZ do kontroli składni w deklaracjach kolej- 
nych zmiennych na liście parametrów. Dopuszczane są 
za nazwą zmiennej separatory ; , | oraz typy (), $, $ () 
+ separator. Na wyjściu w HL — adres za separato- 
rem, a w A — kod separatora, w C bity 7—$ typ 
zmiennej, bity 4—0 nr pierwszej litery nazwy zmiennej. 
W przypadku błędu komunikat Nonsense in BASIC. 

TWORZ (2930—3130) — wykorzystana w procedurze 
PRZEKAZ do tworzenia lokalnego obszaru zmien- 
nych i pamięci pomocniczej lokalnej. 

LIKW (3160—3300) — wykorzystana w programie głów- 
nym do likwidacji obszaru zmiennych lokalnych. Bit 0, 
(IY+71)=0 wskazuje, że w momencie wywołania 
procedury obsługi błędu, program korzystał z lokal- 
nego obszaru zmiennych, jeżeli nie, najpierw następuje 
powrót do poziomu lokalnego (LPOZ 3440—3470). 
CY =0 na wyjściu oznacza osiągnięcie poziomu pod- 
stawowego. 

PPOZ (3330—3410) — wykorzystywana przez procedu- 
rę PRZEKAZ umożliwia przejście do niższego obszaru 
zmiennych. Adres początku obszaru zmiennych lokal- 
nych przechowuje czasowo w VARST. 

POCZML i POCZMP — zmienne wykorzystywane do 
przechowywania adresów nazw aktualnie przepisywa- 
nej zmiennej odpowiednio w liście parametrów proce- 
dury i liście parametrów w instrukcji wywołania proce- 
dury. 

Mam nadzieję, że PROCLOK będzie pomocny użyt- 
kownikom ZX Spectrum. Jeżeli zauważycie w trakcie 
użytkowania programu jakieś nie opisane tutaj reakcje, 
napiszcie o tym do „,„InforMika”. 


LI 








JACEK RAUK 


tutopmaiii __ TPScreen — 


Moduł dodatkowych procedur ekranowych 


Jednym z wielu powodów, dla których Turbo Pascal 
cieszy się wciąż rosnącą popularnością, jest możliwość 
pisania w nim programów nie tylko spełniających dokład- 
nie wymagania użytkownika, ale też w pełni wobec niego 
„przyjacielskich”. Instrukcje zawarte w module Crt po- 
zwalają na uzyskanie szeregu efektów ułatwiających 
obsługę programu, np. migotania zwracającego uwzgę na 
komunikat o błędzie: 


program blink__error; 

uses Crt; 

begin 

(2) 

TextAttr : —  TextAttr + Blink; 
Write (ERROR '); 

TextAttr : —  TextAttr — Blink; 
(:::) 


end. 


Nie znaczy to jednak, że korzystając z modułów 
standardowych TP 4.0 (SYSTEM, CRT, DOS, GRAPH, 
PRINTER, GRAPH3, TURBO3) wykorzystać możemy 
bezpośrednio wszystkie możliwości naszego komputera. 
Kłopoty sprawić może próba wprowadzenia do pro- 
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gramu np. „,rozwijających się” okienek z menu, które 
pojawiałyby się na ekranie, a następnie znikały od- 
twarzając „przykrytą nimi treść. Teoretycznie można po 
„zamknięciu” okna wypisać ponownie utracone linie, nie 
jest to jednak ani wygodne, ani zawsze możliwe, gdyż 
w niektórych programach nie sposób z góry przewidzieć 
zawartości ekranu. Problem ten jest szczególnie istotny 
w programach interakcyjnych (np. edytory tekstu), 
w których zastosowanie tego sposobu komunikacji jest 
najkorzystniejsze. Przydatna byłaby oczywiście możli- 
wość ,,przeczytania”” przez program aktualnej zawartości 
przesłanianego przez okienko fragmentu ekranu i zapa- 
miętania go, odczytania typu karty graficznej i trybu 
w jakim pracuje, wyświetlenia fragmentu ekranu „w 
negatywie” itp.; takich procedur jednak nie znajdziemy 
już w żadnym ze standardowych modułów. Listę podob- 
nych „pobożnych życzeń” wobec TP można by prze- 
dłużać w nieskończoność. 

Twórcy systemu Turbo Pascal 4.0 pozostawili jednak 
na szczęście furtkę umożliwiającą rozwiązanie we włas- 
nym zakresie tych i podobnych problemów. Jest to 
bezpośrednie odwoływanie się do przerwań systemo- 
wych. Wystarczy znajomość numeru odpowiedniego 
przerwania i wymagań co do zawartości rejestrów proce- 


sora, jakie ono stawia. Informacje te znaleźć można 
w szeregu pozycji literaturowych (np. Peter Norton: 
Poradnik programisty komputerów osobistych IBM PC 
— tłumaczenie polskie krążące w postaci plików teks- 
towych, czy też Paweł Niezgodzki, Jerzy Rudowski: Przer- 
wania systemowe, Klub użytkowników mikrokomputerów 
profesjonalnych, Zestaw II; Warszawa 1988). 


Problemy związane z tworzeniem menu oraz z innymi 
nietypowymi operacjami ekranowymi pomaga rozwiązać 
przerwanie nr 16 (10h). Oferuje ono wiele funkcji usługo- 
wych, z których zaledwie niektóre posiadają swoje od- 
powiedniki w postaci procedur i funkcji TP 4.0. Wyboru 
funkcji dokonuje się poprzez umieszczenie ich numeru 
w rejestrze AH. Dodatkowe parametry przekazywane są 
za pośrednictwem pozostałych rejestrów ogólnego prze- 
znaczenia. Numery funkcji usługowych — przer- 
wania 10h podaje Tabela 1. 


Nie ma oczywiście większego sensu pisanie np. własnej 
wersji procedury GotoXY (moduł Crt) w oparciu o funk- 
cję 02h, czy funkcji WhereX i WhereY (również Crt) 
w oparciu o funkcję 03h. Problematyczna też jest przydat- 
ność funkcji 04h (ze względu na małą popularność piór 
świetlnych w sprzęcie klasy PC), praktyczne wydaje się 
jednak skorzystanie z niektórych innych funkcji. 


W przedstawionym na listingu I module TPScreen przed- 
stawiłem wykorzystanie (bezpośrednio lub pośrednio) 
przerwania 10h do: 


© odczytu trybu pracy karty graficznej (funkcja 
GraphMode); 


6 odczytu maksymalnej liczby znaków w linii (funkcja 
MaxVerSize); 


6 odczytu typu karty graficznej (funkcja GraphCard); 


© ustawienia rozmiaru kursora (procedura Cursor); (po- 
dobną procedurę opublikował A. Kadlof — KOM- 
PUTER 11/88); 


© odczytu znaku i jego atrybutu z dowolnego miejsca 
ekranu (procedura GetChar); 


e zapisania znaku i jego atrybutu w dowolnym miejscu 
ekranu (procedura PutChar); 


© wyświetlenia „„,odwrócenia” kolorów tła i znaku wy- 
branego fragmentu ekranu (procedura DisplnvStr). 


Ponadto, już bez uciekania się do przerwań, dodałem 
procedurę Frame, rysującą ramkę o zadanym położeniu. 
Szczegółowe omówienie wszystkich tych procedur byłoby 
zbyt nudne (niezbędne informacje podałem zresztą w for- 
mie komentarza). Poprzestanę na omówieniu działania 
procedur GetChar i DisplnvStr. 


Działanie procedury GetChar rozpoczyna się od „,za- 
pamiętania” aktualnej pozycji kursora w zmiennych 
lokalnych xl i yl i przesunięciu kursora od pozycji 
określonej przez pierwsze dwa argumenty wywołania 
(xiy). Następnie przypisuje ona polom zmiennej lokalnej 
reg typu Registers odpowiednio wartości: 


e polu AH numer funkcji usługowej (08h), 


© polu BH numeru strony, na której dokonujemy opera- 
cji (tu: 0). 


Teraz procedura może już wywołać przerwanie 10h, 
używając zmiennej reg jako drugiego parametru wywoła- 
nia: 

Intr ($10,reg); 


Po wywołaniu przerwania procedura odczytuje kod zna- 
ku (ASCII) z pola AL zmiennej reg, zaś kod atrybutu 
z pola AH. Procedura GotoXY ustawia kursor z po- 
wrotem w pierwotnym położeniu. 


Procedura DisplnvStr jest właściwie podwójną pętlą, 
w której kolejno wszystkie miejsca ekranu mieszczące się 
we wskazanych parametrami wywołania granicach (x,y 
— współrzędne lewego górnego rogu, long — „,długość” 
inwersji, high — jej „„wysokość”) poddawane są kolejno 
następującym działaniom: 


© odczytanie kodu znaku i jego atrybutu (GetChar); 


6 zmiana atrybutu tak, by kolor tła stał się kolo- 
rem znaku i na odwrót (realizowana w zależności od 
typu karty graficznej rozpoznanego przez funkcję 
GraphCard); 


© zapisanie znaku ze zmienionym atrybutem (PutChar). 
Procedura ta wykorzystuje więc pośrednio funkcje 08h, 
OFh i 09h. 


Mam nadzieję, że analiza pozostałych podprogramów 
w oparciu o ich treść i o komentarze nie sprawi nikomu 
kłopotu. 


Zebranie procedur w oddzielny moduł ułatwia ich 
wykorzystywanie we własnych programach i skraca zna- 
cznie czas kompilacji. Zgodnie z regułami Turbo Pascala 
przyłączenie modułu TPScreen musi być poprzedzone 
włączeniem modułów DOS i CRT. Sposób wykorzy- 
stania opisanych procedur do tworzenia powstających na 
ekranie i znikających bez śladu komunikatów i menu, 
ilustruje przedstawiony na listingu 2 program Demo. 


Zastosowanie modułu TPScreen nie ogranicza się tylko 
do tworzenia menu. Listing 3 przedstawia przydatny przy 
tworzeniu dokumentacji programów i instrukcji obsługi 
program rezydujący StFPrint. Jego działanie polega na 
zmianie sposobu obsługi przerwania 05h (wywoływanego 
jednoczesnym wciśnięciem klawiszy Shift i PrintScreen) 
tak, by kopie ekranu tekstowego zapisywane były w pliku 
o nazwie podanej jako pierwszy parametr wywołania 
programu, lub w pliku SCREEN.TXT na aktualnej 
ścieżce aktualnego napędu dyskietek (gdy program wy- 
wołany został bez parametrów). Program ten również 
wykorzystuje opisany moduł. 


Przykłady te nie wyczerpują zastosowań modułu. Przy- 
dać się on może np. przy pisaniu własnego edytora tekstu 
(zmiana wyglądu kursora w trybie insert, podświetlenie 
oznaczonego bloku itp.) oraz w szeregu innych pro- 
gramów. Można wzbogacić go o inne procedury obsługi 
ekranu, np. o procedurę PrtSer (R. Wacławek — INFOR- 
MIK 4/1987), czy też o napisaną samodzielnie procedurę 
do tworzenia okienek tekstowych podobnych do okienek 
graficznych pakietu Borland Turbo Graphic v 1.0 (ciekawe 
ćwiczenie!). Mam nadzieję, że podany moduł przyda się 
przy tworzeniu programów nie tylko efektywnych, ale 
i łatwych w obsłudze. 


Życzę przyjemnej pracy! 









4 LISTING 1 ? 
4 > 
<h TPScreen v 0.9 > 
4 modul ekranowych procedur > 
4 pomocniczych > 
4 J.Rauk 1989 KH» 
4 > 





Unit TPScreen: 


(xskywkkkkkkkkkkkkAkkikkkkkkkkkkkkkkkkkKy 


Interface 
(xzkyżkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkky 


uses 


Dos ,Crt; 
type 
Stat, = M2 
typ wykorzystany w procedurach > 
4 GraphCard i Cursor Ł) 
const 
4 GraphCard ) 4 Cursor ?*ł 
CGA = 0; OFF = 0; 
EGA =, +: ON ssj; 
HGC w 2; THICK = 2; 
function GraphMode: integer; 


< zwraca numer trybu pracy karty graf. ) 
tryb typ kolory rozdzielczosc karta 
EE ED DZ OOOO OZOOOOOOOOOOOOOOOOD OOOO 


4 > 
4 > 
NE. Ę cz-b 40*25 srednia CGA > 
© ad. Ę 16 40*25 srednia CGA > 
0 ork b iż cz-b 80*25 wysoka CGA > 
ZA W 16 80*25 wysoka CGA > 
4 4 G 4 320*200 sred. CGA ? 
4 8 G 4 odc.329*200 sred. CGA > 
4 szarosci > 
4 6 G cz-b 640*200 wys.- CGA ł 
WsDE > cz-b 80*25 wysoka MDA/HGC +) 
4 10 G 4 640*200 wys. EGA > 
4 SL3 G 16 320*200 sred. EGA > 
4 14 G 16 640*200 wys. EGA > 
«15 G 4 640*350 b.wys. EGA > 
function MaxVerSize integer; 
4 zwraca 'szerokosc' ekranu tekstowego ?ł 
4w znakach , ? 
function GraphCard: Stat; 
4 zwraca typ karty graficznej > 
procedure Cursor ( status : Stat ); 
4 procedura ustawia wyglad kursora ? 
< status = OFF — kursor niewidoczny > 
4 status = ON — kursor cienki > 
4 status = THICK — kursor pogrubiony ) 

? 


4 na podst.: A.Kadlof KOMPUTER 11/88 


procedure 
GetChar (x,y:integer;var chr,att:byte); 
procedura odzytuje znak wskazany 
wspolrzednymi x i y i zapisuje jego 
kod w zmiennej chr, oraz kod jego 
atrybutu w zmiennej att 


rm mb pd rb 
— w w w 


procedure PutChar (x,y,chr,att:byte); 
( procedura zapisuje znak o kodzie 
4 chr i atrybucie att w miejscu 
€ wskazanym wspolrzednymi x i y 


a e w 


procedure 

DispilnvStr ( x,y,long,high:byte ); 
4 procedura odwraca kolory znakow od ł 
(4 miejsca okreslonego przez wspolrz. > 
4 RY > 
4 do miejsca o wspolrzednych > 
4 x+long,y+high > 


procedure Frame (x1,yl,x2,y2 : byte); 
4 rysuje ramke o wspolrzednych > 
4 lewy gorny rog = X1.YL: > 

> 


4 prawy dolny rog — x2,y2 


Implementation 
|*kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkKkkkw) 


function GraphMode: integer; 
(rkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk) 
var 
reg  :registers; ( pseudorejestry '» 
begin 
reg.AH:=$0F; 
Intr ($10,reg):; 
GraphMode := reg.AL 


end; ( GraphMode ) 
function MaxVerSize integer; 
(*kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkwkj 
begin 
Case GraphMode of 
0,1 : MaxVerSize := 40; 
Zocdy : MaxVerSize := 80; 
else MaxVerSize := 0; 
end 
end; ( MaxVerSize ) 
function GraphCard: Stat; 


(*kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkKkkkwy 


var 
card : 0..2; 


begin 
Case GraphMode of 
1..6 : card := CGA; 
Z : card := HGC; 
10,13. .15 card := EGA; 
end; 
GraphCard := card 
end; 4 GraphCard ? 


procedure Cursor ( status : Stat ); 
(***kkkkkkkakkkkkkkkkkkkkkkkkkkkkkkkkkky 
var 
reg :registers; ( pseudorejestry ) 
att,atd :integer; ( zmienne pomocn. ł 
begin 
IF GraphCard=CGA then 
begin 
att := $607; 
atd := $308 
end 
else 
begin 
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att := $CQD; 


atd := $50B; 
begin 
att := $CQD; 
atd := $50B; 
end; 
Case status of 
OFF : reg.CH := $20; 
ON : reg.CX := att; 
THICK : reg.CX := atd; 
else EXIT; 
end; 


reg.AX := $100; 
Intr ($10,reg) 
end; 4 Cursor ł» 


procedure 
GetChar (x,y:integer;var chr,att:byte); 
(**kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkky 
var 
x1l,yl : byte; 
4 poczatkowe wspolrzedne kursora > 
reg :registers;  ( pseudorejestry '»ł 
begin 
x1:=WhereX; 
yl:=WhereY; 
GotoXY(x,y); 
With reg do 
begin 
AH:=$08; 
BH: =0; 
end; 
Intr ($10,reg); 
With reg do 


begin 
chr :=AL; 
att:=AH 
end; 
GotoXY (x1,yl); 
end; ( GetChar » 
procedure PutChar (x,y,chr,att:byte); 
(ykkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkky 
var j 
X1l,yl : Byte; 


4 poczatkowe wspolrzedne kursora ? 
reg :registers;  ( pseudorejestry '» 
begin 


X1:=WhereX; 
yl:=WhereY; 
GotoXY(x,y); 
With reg do 
begin 
AH:=$09; 
AL:=chr; 
BH:=0; 
BL:=att; 
CX:=1 
end; 
Intr ($10,reg); 
GotoXY (xl,yl); 
end; ( PutChar ) 


procedure 
(f*zkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkky 


DisplnvStr ( x,y,long,high:byte ); 


var 
R-T=3K> ( zmienne pomocnicze ) 
16; 4 kod znaku > 
at : byte; ( kod atrybutu znaku ?ł 
begin 


For h:=0 to (high-1) do 
For i:=0 to (long-1) do 
begin 
GetChar (x+i,y+h,lt,at); 
If GraphCard=HGC then 
If at=112 then 
at:=7 
else 
at:=112 
else 
begin 
j:=(at and 112) shr 4; 
k:=(at and 7 ) shl 4; 
at:= at and 136; 
at:= at or jork 


end; 
PutChar (x+i,y+h,lt,at) 
end 
end; (4 DisplnvScr ) 
procedure Frame (x1l,yl,x2,y2 : byte); 


(ekkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkK) 


var 


*.Vvzl integer; ( zmienne pom. > 
begin 
If (x24=x1) or (y2<yl) then 
EXIT; 


x:=WhereX;y:=WhereY; 
If yl=y2 then 
begin 
GotoXY (x1,y1); 
For i:=x1l to x2 do 


Write (%*205) (=) 
end 
else 
begin 
GotoXY (x1,y1); 
Write (+201); Fr > 
For i:=(x1+1) to (x2-1) do 
Write (+205); (=) 
Write SŁ Ó n » 
For 1:=(y1+1) to (y2-1) do 
begin 
GotoXY (x1,i); 
Write (+186); Eg > 
GotoXY (x2,i); 
Write (+186) 5.2 
end; 
GotoXY (x1,y2); 
Write (+200); (kk) 
For i:=(x1+1) to (x2-1) do 
Write (+205); (=) 
Write (+4188) ; (dl » 
end; 
GotoXY (x,y) 
end; 4 Frame ) 
end. 4 modulu ) 


(y*kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkKkk) 





4 LISTING 2 ł 
program DEMO; 
( demonstruje wykorzystanie biblioteki +) 
4 TPScreen do tworzenia MENU > 

uses 

Dos,Crt,TPScreen; (dolaczenie modulow) 

type 

ScreenTab 


= array "lt. .80.1. .25ł of char; 
STPtr = "ScreenTab;: 


var 
I,J : integer; ( liczniki + 
A : STPEr= 
( wskaz na tabl. z "kopia" ekranu ) 
GW ( kod znaku ł 
Att : byte; ( kod atrybutu ) 
begin 4 PROGRAM ) 
4 ZAPELNIENIE EKRANU ł 
For I:=1 to 24 do = 
Writeln 
('To jest linia nr':30,i:3); 
Delay (3000); 
New (A ); 
4 UTWORZENIE "OKNA" ) 


Cursor (OFF _ 9): 
For J:=2 to 5 do 
For 1:=10 to 40 do 
begin 
GetChar ( I,J,Ch,Att ); 
A*[I,J]:=Char (Ch); 
PutChar (.14J,32,%Et ) 
end; Ę 
Frame (10,2,40,5); 
Gotom u lid"; 


Writecę”" A tak moze' ); 
GoboXY „(Tt.4 7X: 
Write ( ' wygladac MENU' ); 


Delay (30080); 
4 PODSWIETLENIE DOLNEJ LINII "OKNA" ? 
DispinvStr ( 12,4,17,1 ); 
Delay (3900); 
£ WYGASZENIE DOLNEJ LINII "OKNA" > 
DisplnvStr ( 12,4,17,1 ); 
4 PODSWIETLENIE GORNEJ LINII "OKNA" > 
DISPINYStY 6'1273,17.,179);; 
Delay (30200): 
4 ODTWORZENIE EKRANU ) 
For J:=2 to 5 do 
For I:=10 to 40 do 
begin 
Ch:= Ord (A"[I.J1): 
PutChar ( I.J,Ch.Att ):; 
AUT;J]:=" ' 
end; 
GótoZY (1,25 2)3 
Delay (3000); 
Cursor ( ON ); 
Dispose ( A ) 
END. 4 PROGRAM ) 
4 xkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk) 
Tabela 1. Funkcje. usługowe przerwania 1Ohex. 


Nr funkcji Działanie 
dec hex 


Wybór trybu pracy 

Ustawienie rozmiaru kursora 
Ustawienie pozycji kursora na ekranie 
Odczytanie pozycji kursora 

Odczytanie pozycji pióra świetlnego 
Ustawienie aktywnej strony. dodatkowe operacje 
Przesuwanie okna w górę 

Przesuwanie okna w dół 

Odczytanie znaku i atrybutu 

Zapis znaku i atrybutu 

Zapis znaku 

Ustawienie palety kolorów 

Zapis punktu 

Odczyt punktu 

Pisanie w trybie terminala (TTY) 
Odczyt aktualnego trybu pracy 
Zarezerwowane dla karty EGA 
Dodatkowe procedury dla IBM PC AT 


a 
1 
2 
3 
4 
5 
8 
7 
8 
9 





4 LISTING 3 


($M 1024,0,000 
( ustawienie rozmiaru stosu i stery 


program 
4 zmienia obsluge przerwania $05 tak, 
4 by kopia ekranu tworzona byla 

4w pliku o nazwie podanej jako 

4 pierwszy parametr wywolania 


uses Dos,Crt,TPScreen; 


var 
Pl : text; 
4 plik zawierajacy 'kopie' ekranu 
i : integer; ( licznik 


($F+) ( wymuszenie dalekich wywolan 
procedure SaveScreen; 
4 nowy sposob obslugi przerwania 05 

var 
i.j : integer; 4 liczniki 
CREE? 4 kod znaku 
att : byte; 4 kod atrybutu 
begin 
Cursor ( OFF ); 
Append ( pl ); 
For j:=1 to 25 do 
begin 
For i:=1 to MaxVerSize do 
begin ; 
GetChar (i,j,chr,att); 
Write ( pl,Char(chr) ) 
end; 
Writeln ( pl ) 
end; 
For i:=1 to MaxVerSize do 
Write ( pl.*205 ); 
Writeln ( pl ); 
Close ( pl ); 
Cursor ( OŃ ); 


StFPrint; 


interrupt; 


> 


ł 
> 


> 
ł 
) 
ł 


> 
; 


i 


> 


ł 
RR 
) 





end; 4 SaveScreen ) 
4$F-) ( wymuszenie bliskich wywolan > 
begin 4 PROGRAM + 
If ParamCount>0 then 
Assign ( pl,ParamStr(1) ) 
else 
Assign ( pl, 'Screen.TXT' ); 
Rewrite ( pl ): 
For i:=1 to MaxVerSize do 
Write ( pl,+205 ); 
Writeęln ( pl ); 
Close ( pl ):; 
SetIlntVec ( $05,©SaveScreen ); 
Keep (0) 
END. ( PROGRAM ) 


(eykkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk) 








OPERACJE NA DANYCH I ZBIORACH 
W MSX-BASIC 


EDWARD KRAWCZYŃSKI 


Dialekt MSX-BASIC daje nam o wiele większe moż- 
liwości przetwarzania danych niż standardowy BASIC. 
Na uwagę zasługuje możliwość definiowania wielowy- 
miarowych i wieloparametrowych tablic łańcuchowych 
i liczbowych, a także wieloparametrowych funkcji mate- 
matycznych i logicznych. Poniżej przedstawiamy te zaga- 
dnienia ilustrując je wieloma przykładami. 


Wykorzystanie tablic w MSX-BASIC 


Zamiast zmiennych prostych numerycznych lub łań- 
cuchowych, których liczba jest ograniczona rozmiarami 
alfabetu i wskaźników użytych do ich oznaczenia, można 
używać zmiennych organizowanych w postaci tablic. 
Pamiętać należy, że MSX-BASIC rozróżnia tylko dwa 
pierwsze znaki oznaczające zmienną. 

Zmienna tablicowa stanowi grupę lub macierz. Wszyst- 
kie zmienne posiadają tą samą nazwę. Do ich rozróż- 
nienia służą indeksy określające położenie zmiennej w ta- 
blicy. Indeksy te określone są liczbami całkowitymi 
z deklarowanego w tablicy zakresu lub zmienną numery- 
czną. 


Listing i 

10 DIM AC15> 
20 K=17 

30 DIM BC3,K> 


40 DIM C$€3,K> 





Powyższy przykład pokazuje sposób deklarowania ró- 
żnego rodzaju tablic. Wiersz 10 rezerwuje pewien obszar 
pamięci dla tablicy liczbowej o nazwie „,a”, zawiera- 
jącej 16 elementów o nazwach: a(0), a(1), . .,a(14),a(15), 
zaś wiersz 30 dla tablicy liczbowej dwuwymiarowej 
4 x 18-elementowej o nazwie „,b”” i następujących elemen- 
tach: 

b(0,0) b(0.1)  b(0,2) 
b(l,0) b(1,1) b(1,2) 


b(0,16)  b(0,17) 
b(1,16)  b(1,17) 


b(3,0) b(3.1) b(3,2) b(3,16) b(3,17) 

Wiersz 40 deklaruje tablicę o identycznej strukturze 
oraz ilości elementów, lecz zawierającej zmienne łań- 
cuchowe. Po zadeklarowaniu tablicy komputer nadaje 
automatycznie wartość 0 zmiennym tablicowym (nume- 
rycznym) lub łańcuch pusty o długości 0 spacji zmiennym 
łańcuchowym. 





ROMAN KULA 


MSX-BASIC ogranicza każdy z wymiarów macierzy 
do 255, zaś liczba elementów macierzy ograniczona jest 
rozmiarami pamięci mikrokomputera. Oznacza to na 
przykład, że komputer odpowie raportem o przepełnieniu 
po ewentualnej deklaracji DIM a(5,300). 

Tablica numeryczna bez deklaracji typu zmiennych jest 
automatycznie ustawiana na „podwójną precyzję”. Jeśli 
zmienne w deklarowanych tablicach nie muszą mieć 
podwójnej precyzji to należy dodatkowo zadeklarować 
ich typ, np. DIM a%(3,9). Pozwala to zaoszczędzić 
miejsce w pamięci, a także przyspieszyć działanie pro- 
gramu. Poniższe zestawienie obrazuje zależność obszaru 
pamięci zajmowanego w zależności od typu zmiennych 
i tablic. » 


typ zmiennej ilość bajtów 


całkowita 2 
pojedynczej precyzji 4 
podwójnej precyzji 8 
typ tablicy ilość bajtów 


2 na element 
pojedynczej precyzji 4 na element 
podwójnej precyzji 8 na element 
Deklaracja tablic lub zmiennych łańcuchowych powo- 

duje zajęcie 3 bajtów przez nazwę tablicy lub zmiennej 

oraz obszar zależny od długości łańcucha. 

W MSX-BASIC możliwe jest odwołanie się do nie 
zadeklarowanej tablicy. Można to uczynić np. zleceniem 
DC(L3,2) =153 
które automatycznie powoduje zadeklarowanie tablicy 
liczbowej trójwymiarowej 11 x 11 x 11 elementowej o na- 

zwie „D”. * 

Równoważne to jest zleceniu DIM D(10,10,10), przy- 
porządkowaniu wszystkim zmiennym z tablicy „D” 
wartości 0 oraz zmiennej D(1,3,2) wartości 153. Jeśli 
jednak zamierzamy korzystać z tablicy o rozmiarach 
mniejszych należy deklarować je za pomocą DIM, co 
pozwoli oszczędzić pamięć. Powyższe rozważania zilu- 
struje następujący przykład: i 


całkowita 


Łisting 2 

10 D<C1,2,3>=153 

20 PRINT D<1,2,3> 
30 PRINT D<2,2,3> 
40 PRINT D<10,10,10> 


50 PRINT DC11,10,10> 
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MSX-BASIC umożliwia także deklarowanie jedną 
instrukcją DIM kilka tablic, np.: 
DIM A(3,4), B(5), C(2,12,7) 


Próba deklaracji tablicy o nazwie już zadeklarowanej 
(bez względu na wymiar) jest niedopuszczalna — kompu- 
ter zakomunikuje o błędzie. Aby taka deklaracja była 
możliwa należy wcześniej wymazać tablicę o danej nazwie 
z pamięci mikrokomputera. 

Funkcja ta realizowana jest przez zlecenie 

ERASE a 
likwidujące w pamięci komputera tablicę numeryczną 
o nazwie ,„a” bez względu na jej strukturę i wymiary. 
Podobnie kasujemy tablicę zmiennych łańcuchowych 
wstawiając do zlecenia nazwę tablicy ze znakiem ;,$”. 
Jednym zleceniem można również usunąć większą liczbę 
tablic z pamięci mikrokomputera np. 
ERASE a,b,c,d 
ERASE a$,b$,c$ 
ERASE a$,b,c,d$ 


Przedstawianie i używanie liczb i zmiennych 
w różnych systemach liczbowych 


Komputery MSX standardowo obrazują wyniki wyko- 
rzystując dziesiętny system liczbowy. Oczywiście pracują 
wykorzystując system dwójkowy. Język MSX-BASIC 
posiada zlecenia, które pozwalają przedstawiać liczby 
i zmienne w systemach: 

— dziesiętnym, 

— dwójkowym (binarnym), 

— ósemkowym, 

— szesnastkowym (heksadecymalnym). 

System dziesiętny najczęściej wykorzystywany do 
przedstawiania efektów działań nie wymaga większych 
objaśnień. Na uwagę zasługuje możliwość przedstawiania 
liczb z podwójną precyzją, z pojedynczą precyzją oraz 
całkowitych zmiennoprzecinkowych. 


Aby zapisać lub zobrazować liczbę w systemie dwój- 
kowym należy poprzedzić ją kodem £B, np. zlecenie 
x =©B10110:PRINT x 
da w efekcie na ekranie liczbę 22. Następuje więc 
przeliczenie liczby wyrażonej w systemie dwójkowym na 
dziesiętny. 
Odwrotne przeliczenie następuje po użyciu zlecenia 
BIN$, np. PRINT BIN$ (22) 
spowoduje wyświetlenie na ekranie wartości 10110 (dwój- 

, kowo). 

Aby zapisać lub zobrazować liczbę w systemie ósem- 

kowym należy poprzedzić ją kodem £O, np. 
PRINT £0O 120 
spowoduje wyświetlenie liczby 80. Przeliczenie odwrotne 
następuje po użyciu zlecenia OCT$. Tak więc 
PRINT OCT$ (80) 

spowoduje wyświetlenie na ekranie wartości 120 (6sem- 
kowo). 

Analogicznie zapis liczby w systemie szesnastkowym 
wymaga użycia kodu $cH np. 

PRINT £H 1AF 
spowoduje wyświetlenie liczby 431. Odwrotne przelicze- 
nie następuje po użyciu zlecenia HEX$. Więc zapis 
PRINT HEX$ (431) 

spowoduje wyświetlenie na ekranie wartości LAF (sze- 
snastkowo). 
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Oczywiste jest, że możliwe jest przeliczanie dowolnych 
liczb z dowolnego wymienionego systemu na inny. 


Funkcje, operatory logiczne i matematyczne, 
definiowanie funkcji 


Zapisując wyrażenia arytmetyczne wykorzystujemy 

następujące operatory działań: 

+ dodawanie 

— odejmowanie 

»  potęgowanie 

* _ mnożenie 

/__ dzielenie 

N. dzielenie całkowitoliczbowe (część całkowita 'ilo- 
razu). 

W wyrażeniach arytmetycznych można używać nawia- 
sy zarówno okrągłe, jak i kwadratowe — także jedne 
zawarte w drugich. Wyrażenia, stałe i zmienne można 
porównywać używając do tego celu operatorów relacji, 
np. 
X14>10.2 XI =XR32 
AS="MSX” X)(A-»2—C)+x(B+D) 

Operatorów można również użyć do oceny prawdziwo- 
ści wyrażenia, przy czym prawda jest wyświetlana jako 
— | (minus jeden), zaś fałsz jako 0, np. 

PRINT 2=1+4 da wartość 0 
PRINT 5)2-2 da wartość — l 

W wyrażeniach logicznych można używać następują- 
cych operatorów logicznych: NOT, AND, OR, XOR, 
EQV, IMP testujących różne relacje lub operacje. 

Wszystkie wyżej wymienione operatory mają przypisa- 
ny tzw. priorytet, czyli pierwszeństwo działania. Naj- 
wyższy priorytet ma potęgowanie, a następnie kolejno: 
„— (zmiana znaku liczby), mnożenie i dzielenie, doda- 
wanie i odejmowanie, operatory relacji, operatory logicz- 
ne w kolejności wymienionej wyżej. 

MSX-BASIC posiada liczną grupę funkcji standar- 
dowych rezydujących w ROM. W Tabeli I zestawiono ich 
pełny wykaz wraz z objaśnieniem. 

Przedstawiony zestaw funkcji standardowych pozwala 
na tworzenie innych funkcji, w tym również bardzo 
złożonych, np. 

ASN(X) = ATN(X/ SQR(1 — X 1 2)) arcus sinus 
HSN(X) = (EXP(X) —EXP(—X))/2 sinus 
hiperboliczny 

Często w programowaniu zachodzi konieczność wielo- 
krotnego obliczania wartości funkcji o złożonej postaci 
dla różnych wartości argumentów. W takich przypad- 
kach najprostszym i najekonomiczniejszym rozwiąza- 
niem jest skorzystanie z możliwości definiowania postaci 
funkcji wg schematu: 

DEF FN nazwa (lista argumentów) = definicja funkcji 
gdzie: 

nazwa to zestaw znaków rozpoczynający się od litery 
(znaczące są tylko dwa pierwsze znaki np. A, Al, AB), 
lista argumentów zaś obejmuje nazwy zmiennych (o- 
znaczenia argumentów) rozdzielonych przecinkami — 
dopuszczalna liczba argumentów wynosi dziewięć; 

definicja funkcji stanowi wyrażenie prezentujące po- 
stać funkcji. Należy pamiętać że DEF FN ... nie może być 
użyte w trybie bezpośrednim. Po zdefiniowaniu funkcji 
każdorazowo, gdy chcemy znać lub wykorzystywać jej 


wartość dla określonych argumentów, należy odwołać się 
do niej wg schematu: 

FN nazwa (lista wartości argumentów) 
gdzie: 

lista wartości argumentów przedstawia ciąg liczb 
lub zmiennych w ilości zgodnej z ilością argumentów 
w DEF FN, np. 





Listing 3 

10 DEF FN FCX,YD=X+2*Y 
20 A=1i 

30 K=FN FCA,2> 


40 PRINT "K=";K 





Realizacja tego przykładu da w wyniku k=5. 

Przedefiniowanie postaci funkcji nie wymaga uprzed- 
niego wymazania poprzedniej postaci funkcji. Zlecenia 
CLEAR i RUN czyszczą z pamięci mikrokomputera 
zmienne zdefiniowane przez funkcję. 

Jeśli chcemy, aby argumenty funkcji miały określony 
typ przed obliczeniem wartości funkcji, należy w tym celu 
dokonać ich określenia wykorzystując zlecenia DEF 
INT, DEF SNG lub DEF DBL. 


Operacje na zbiorach danych, wprowadzanie danych 


Większość wykonywanych programowo działań pole- 
ga na obliczaniu wartości wyrażeń lub podstawianiu pod 
zmienne parametrów lub wartości liczbowych. Do tego 
celu służy instrukcja podstawiania LET o postaci: 





Listing 4 

10 LET A=7 

20 B=5 

30 LET C=Z2*A+B 

40 A$='"Ala ':B$=''ma ":G$=''kotów" 
50 D$=A$+B$ 

60 RRINT D$;C;C5 


70 LET E='"msx'* 





Wykonanie linii 70 spowoduje wyświetlenie komunika- 
tu o błędzie „Type mismatch”, jako że typ zmiennej 
i wyrażenia w instrukcji musi być zgodny. 

Jednym ze sposobów nadawania wartości zmiennym 
jest wprowadzanie ich przez obsługującego komputer 
z klawiatury w trakcie biegu programu. Umożliwia to in- 
strukcja programowego wprowadzania danych o postaci: 

INPUT *komentarz"; lista zmiennych, 


gdzie komentarz stanowi dowolny zestaw znaków. 

Po napotkaniu tej instrukcji komputer wstrzymuje 
realizację programu aż do wprowadzenia przez obsługę 
wszystkich zmiennych z uwzględnieniem ich typu i ilości. 

Oczekiwanie na wprowadzenie danych sygnalizowane 
jest wyświetlaniem znaku „,?” lub komentarza i znaku 


FUNKCJA 


SIN (X) 
COS (X) 
TAN (X) 


ATN (X) 


SQR (X) 


LOG (X) 


EXP (X) 
SGN (X) 


ABS (X) 
INT (X) 


FIX (X) 

RND (X) 

LEN (A$) 
LEFTS (A$,X) 
RIGHT$ (A$,X) 


MID$ (A$,X,Y) 


INSTR (X,A$,B$) 


CHRS$ (X) 


SPACE$S (X) 
SPC (X) 


STR$ (X) 


STRINGS (X,Y) 
STRINGS (X,A$) 


ASC (A$) 


PRE”) 
DSKF (0) 
LPOS (X) 


TABELA 1 
WYNIK 


Wartość funkcji sinus, cosinus, tangens 
z argumentu podanego w mierze łuko- 
wej, a wynik obliczeń podawany jest 
z podwójną precyzją. 


Wartość funkcji arcus tangens, wynik 
zawiera się w przedziale [ — x/2,n/2] i jest 
podawany z podwójną precyzją. 


Wartość pierwiastka kwadratowego 
z dodatniego argumentu. 


Wartość logarytmu naturalnego z dodat- 
niego argumentu. 


Wartość wyrażenia: e", X( = 146. 


Znak liczby, wartość 1, 0 lub —1 
w zależności od znaku argumentu. 


Wartość bezwzględna argumentu. 


Największa liczba całkowita nie większa 
od argumentu. 


Część całkowita argumentu. 
Liczba pseudolosowa z przedziału 40;1). 
Liczba znaków (długość) łańcucha A$. 


Łańcuch X-znakowy zawarty w łańcu- 
chu A$ licząc od lewego (LEFT) lub 
prawego (RIGHT) końca łańcucha A$. 


Łańcuch Y-znakowy pochodzący z łań- 
cucha A$ rozpoczynający się elementem 
znajdującym się na pozycji X licząc od 
lewej strony tego łańcucha. 


Pozycja licząc od lewej w łańcuchu A$, 
gdzie łańcuch B$ zawiera się w A$, zaś X 
wskazuje pozycję znakową, od której 
rozpocznie się przeszukiwanie łańcucha 
A$. Instrukcja rozróżnia małe i duże 
litery. 


Łańcuch, którego kodem ASCII jest ar- 
gument. 


Łańcuch składający się z X spacji. 
Wyświetla X znaków pustych (tylko pod 
PRINT i LPRINT). 


Tworzy ze zmiennych numerycznych 
X zmienne łańcuchowe, na których moż- 
na wykonywać operacje łańcuchowe. 


Łańcuch X-znakowy o kodzie ASCII 
równym Y lub o kodzie pierwszego zna- 
ku łańcucha A$. 


Wartość kodu ASCII dla pierwszego 
znaku łańcucha A$. 


Podaje odpowiednio zapis dwójkowy, 
ósemkowy, szesnastkowy argumentu 
dziesiętnego. 


Ilość wolnej pamięci. 
Ilość wolnej pamięci dla łańcuchów. 
Ilość wolnej pamięci na dysku. 


Bieżąca pozycja w wierszu głowicy dru- 
kującej drukarki. 


Bieżąca współrzędna pozioma kursora. 
Bieżąca współrzędna pionowa kursora. 


Konwersja argumentu na liczbę całkowi- 
tą, pojedynczej precyzji, podwójnej pre- 
cyzji. 


- 








„?”. Kolejny przykład pokazuje warianty wykorzystania 
instrukcji INPUT. 





Listing 5 

10 GLS 

20 PRINT "a=";:INPUT A 

30 INPUT '"b=";B 

40 PRINT'wprowadź A$,k";:INPUT A$,K 
50 INPUT"Podaj d,e,f *";D,E,F 

60 FOR I=1 TO 10 

70 PRINT"ac€";1;'>=";:INPUT A<I> 

80 NEXT I 


90 PRINT "aC3)='';AC3) 


Dla zmiennych łańcuchowych możemy używać in- 
strukcji o postaci ogólnej: 
LINE INPUT [ komentarz ;] lista zmiennych łańcu- 
chowych, która przyjmuje z klawiatury łańcuch o długo- 
ści do 254 znaków oraz nie generuje pytajnika jak 
INPUT. 
Z kolei instrukcja 

INPUT$ (X) 

przyjmuje określoną argumentem X ilość znaków 
z klawiatury zapamiętując je, a następnie przechodzi do 
dalszej realizacji programu. 
Łisting 6 
10 GLS 
20 PRINT "Naciskaj różne klawisze" 
30 PRINT INPUT$C3> 
40 B$=INPUT$C2> 
50 PRINT B$ 
60 C$=INPUT$<1> 
70 IF C$="1' THEN PRINT"Nacisnąłeś 1" 
80 IF C$©"1" THEN PRINT"Nacisnąłęś nie 1' 


90 GOTO 60 


Instrukcja: 
INKEY$ 
tworzy jednoznakowy łańcuch odpowiadający naciśnię- 
temu klawiszowi. Łańcuch ten może być pusty, jeśli nie 
naciśnięto żadnego klawisza lub kilka naraz. 
Listing 7 
10 GLS 
20 PRINT'"*Program będzie kontynuowany gdy 
naciśniesz dowolny klawisz'' 
30 IF INKEY$="" THEN 30 ELSE 40 
40 K$=INKEY$ 


50 PRINT K$ 


20 i 





60 GOTO 40 
70 REM Sprawdź działanie programu umieszcza jąc 
w linii 50 po K5 różne separatory (przecinek, 


średnik)» 





Instrukcja: 

SWAP zmienna,zmienna 
wymienia wzajemnie między sobą obie zmienne tego 
samego typu. Próba wymiany między sobą zmiennej 
numerycznej na łańcuchową powoduje błąd. 
Instrukcje: 

DATA lista stałych 

oraz 

READ lista zmiennych 
umożliwiają wprowadzanie dużej liczby zmiennych nu- 
merycznych lub łańcuchowych. Występują one łącznie, 
jak np. FOR-NEXT. DATA przechowuje dane, które 
w trakcie wykonywania programu będą podstawiane pod 
zmienne przy pomocy READ. Widać stąd, że lista stałych 
oraz lista zmiennych muszą być komplementarne. Konie- 
cznym warunkiem jest więc, aby liczba zmiennych w RE- 
AD nie przekraczała liczby stałych w DATA oraz by typ 
zmiennej odpowiadał typowi stałej. MSX dopuszcza 
jednak możliwość niespełnienia tego ostatniego warunku. 
Pokazuje to poniższy przykład. 





Listing 8 


10 DIM AC8),A$C12) 
20 D$="dana'"' 
30 DATA 0,1,2,ala,4,'bela'"',5,d$,6,7,8 


40 FOR I=0 TO 6 


50 READ A<CI> 


60 READ ACI$> 

70 PRINT ' AC'*;1;'>="';ACID 

80 PRINT "A$C";I;">="";A$<IV 

90 NEXT I 

100 PRINT "Naciśnij dowolny klawisz!” 
110 IF INKEY$="''* THEN 110 ELSE 120 
120 GOTO 20 

130 DATA 9,10,11,12,13,14,15,16,17,18,19, 
20,21,22,23,24,25,26,27 ,28,29,30 

140 REM dopisz linię 35 RESTORE a 


następnie 35 RESTORE 130 


Przykład ten pokazuje również sposób użycia in- 

strukcji 
RESTORE 
oraz 
RESTORE nr linii. 

Powoduje ona powtórne odczytanie listy danych od 
początku tej listy (RESTORE) lub od danych zawartych 
w linii wskazanej przez RESTORE nr linii. 





Router, czyli o kierowaniu ruchem 


Przy obecnym poziomie informatyzacji polskich przedsiębiorstw, nie- 
mal każdy komputer klasy IBM PC jest wykorzystywany do kilku różnych 
zastosowań, często też korzysta z niego kilka osób. Regułą jest, że na 
dysku twardym znajduje się wiele programów aplikacyjnych. Zwykle też 
użytkownicy tworzą odrębne podkatalogi dla swoich programów. Nie- 
stety, przejście od pracy z jednym programem do pracy z innym, 
umieszczonym w innym podkatalogu, wymaga nużącej sekwencji poleceń 
cd (ang. Change Directory) i podawania nowych ścieżek dostępu. Utrud- 
nione jest także wywoływanie, z dowolnego podkatalogu, programów 
pomocniczych, takich jak np. XTREE. 

Trudnościom tym można zaradzić, konstruując specyficzną strukturę 
podkatalogów (najlepiej przy pomocy programu XTREE) oraz wykorzys- 
tując procedury wsadowe (batch). Struktura podkatalogów powinna 
odwzorowywać podział tematyczny zawartości dysku: podkatalogi pierw- 
szego stopnia — grupy programów pokrewnych (np. „„Edytory ”), drugie- 
go stopnia — programy (np. ,,„Chiwriter”, „Wordstar” itp.), a pod- 
katalogi trzeciego stopnia — biblioteki, zbiory robocze itp. W takiej 
strukturze każdy program powinien posiadać swój własny katalog. Jest to 
użyteczne, ponieważ pracując np. z XTREE można łatwo orientować się 
w zawartości dysku (nazwy większości plików wykonywalnych różnią się 
od tytułu programu, natomiast katalog można nazwać tytułem). Porząd- 
kując pliki (np. kasując zbędne kopie robocze) jesteśmy pewni, że 
omyłkowo nie zniszczymy istotnych fragmentów innego programu. 
Ostatnią, lecz wcale niebagatelną korzyścią z takiej, pozornie dość 
skomplikowanej, organizacji dysku jest większy repertuar dostępnych 
nazw zbiorów: w różnych katalogach mogą występować te same nazwy. 

Opisana struktura katalogów nie wystarcza sama do usprawnienia 
pracy, wręcz przeciwnie, komplikuje ją. Dla pełnego komfortu trzeba 
jeszcze skorzystać z dwóch usług systemu MS-DOS: polecenia PATH 
i plików wsadowych .BAT. 

Polecenie PATH służy do poinformowania systemu operacyjnego, 
gdzie szukać plików wykonywalnych (typu .EXE, .COM lub .BAT), jeśli 
nie ma ich w bieżącym podkatalogu. Polecenie ma format: 

PATH = ścieżka__l;ścieżka__2;... 
Jeśli pliku o podanej nazwie nie ma w bieżącym katalogu, to system szuka 
pliku w katalogach wyspecyfikowanych podanymi ścieżkami dostępu (w 
kolejności ich podania). Wystarczy więc wskazać ścieżki dostępu do 
wszystkich podkatalogów (najlepiej w kolejności odpowiadającej popu- 
larności programów), aby system bez problemu odnajdywał wywoływane 
pliki. 

Opisane rozwiązanie spełnia swoje zadania tylko w przypadku pro- 
gramów mieszczących się w jednym pliku. Niestety, większość programów 
zawiera biblioteki — np. krojów czcionki, procedur sterujących (ang. 
driver) — i oczekuje, że wszystkie te zbiory znajdują się w bieżącym 
podkatalogu. Wywołanie (przy pomocy polecenia PATH) z innego 
katalogu prowadzi więc do nieuchronnego komunikatu o błędzie. 

Na szczęście istnieją procedury wsadowe batch. Dla każdego programu 
użytkowego należy utworzyć procedurę wsadową, która zmieni katalog 
na właściwy i wywoła plik danego programu. Procedura wsadowa może 
też zawierać wywołania programów rezydujących i sterujących np. myszą. 
A więc plik batch inicjujący pracę systemu OrCAD może wyglądać 
następująco: 

echo off 
cd ORCAD 


msmouse 
draft 

Do utworzenia plików wsadowych można posłużyć się edytorem 
systemowym (przykładowe polecenie: copy con orcad.bat) lub dowolnym 
innym, np. funkcją „„Notes” SideKicka. Wszystkie procedury wsadowe 
wygodnie jest zgromadzić w oddzielnym pliku podkatalogu (np. pod 
nazwą ROUTER) i wpisać do pliku AUTOEXEC.BAT polecenie 

PATH = C:;4ROUTER 

Pierwsza ścieżka wskazuje na katalog główny, w którym powinny 
znaleźć się podstawowe programy narzędziowe (np. PARK), a druga 
— na katalog procedur wsadowych „„,kierujących ruchem”. Od tej chwili 
każdy program może być wywoływany z dowolnego podkatalogu przez 
proste wpisanie jednej nazwy. 


Winchester pod lupą 


Upowszechnienie i potanienie twardych dysków sprawiło, że użytkow- 
nicy zaczęli traktować je jako szybki i wygodny magazyn danych. Gdy 
jednak zgromadzone informacje mają dużą wartość, zaufanie do Winche- 
sterów maleje. Nawet produkty renomowanych firm, eksploatowane 
według wszelkich reguł sztuki, sprawiają czasem użytkownikowi wstrząsa- 
jącą niespodziankę w postaci komunikatu DATA ERROR, READ 
FAULT, SECTOR NOT FOUND lub nawet, HARD DISK FAILURE. 
Przyczyn takich zdarzeń może być kilka. Pierwszą z nich jest „„rozjeżdżanie 
się” ścieżek na dysku. Nowy dysk sformatowany fabrycznie ma wąskie, 
wyraźne ścieżki z wpisanymi identyfikatorami ścieżek i sektorów. Tem- 
peratura, wibracje, zmęczenie materiału i temu podobne czynniki sprawia- 
ją, że kontur ścieżki zaczyna się rozmywać: dane zapisane rano, gdy 
mechanizm pozycjonowania głowicy był zimny, są umieszczone bliżej 
środka, a informacje południowe bliżej krawędzi dysku. Im dłużej 
eksploatujemy dany fragment dysku, tym szerszy jest zapis, aż wreszcie 
ścieżki zaczynają na siebie nachodzić i danych nie można już odczytać. Co 
więcej, każda kolejna próba zapisu na takiej ścieżce kończy się fiaskiem. 


Kolejna przyczyna to nieuchronne starzenie się warstwy magnetycznej 
dysku. Nie chodzi bynajmniej tylko o zużycie mechaniczne. Najgroźniej- 
sze są zmiany właściwości fizycznych: gładkości i zdolności magnesowa- 
nia. Te cechy zmieniają się z czasem, podlegają wahaniom związanym ze 
zmianami temperatury i zależą od jakości pokrycia podłoża warstwą 
magnetyczną. Po pewnym czasie nawet na najstaranniej wyprodukowa- 
nym dysku dane mogą „zatrzeć się”. 


Najgroźniejszym wrogiem danych na dysku są zakłócenia elektryczne 
pochodzące z sieci lub powodowane przez ładunki elektrostatyczne. 
Rozmycie ścieżek lub rozmagnesowanie nośnika zdarza się o wiele 
rzadziej, niż przepięcia i spadki napięć zasilających. Mimo starannie 
projektowanych zabezpieczeń sterownikom dyskowym zdarza się zapisać 
w takich chwilach przypadkowe dane w przypadkowym miejscu dysku, 
niestety czasem także na tablicy alokacji lub katalogu. 


Zabezpieczenie się przed podobnymi przygodami polega zwykle na 
kopiowaniu zawartości twardego dysku na dyskietki lub kasetę streamera. 
Jest to jednak zajęcie czasochłonne, uciążliwe, a w dodatku nie daje 
pełnych rezultatów — mało kto tworzy awaryjne kopie codziennie, 
a i wtedy rezultat całodziennej pracy może być zniweczony zapisaniem 
danych na rozmytej ścieżce. O cenie streamera lepiej nie wspominać... 


Odmienną, interesującą metodę zapobiegania kłopotom z twardymi 
dyskami zaproponowała firma Prime Solutions Inc. z San Diego oferując 
program Disk Technician. Jest on przedstawicielem nowej gałęzi opro- 
gramowania użytkowego — programów konserwacyjno-naprawczych, 
wykorzystujących techniki sztucznej inteligencji. Disk Technician spraw- 
dza jakość zapisów na twardym dysku i przeprowadza kompleksową 
naprawę wykrytych usterek. Jeśli stwierdzi, że któraś ze ścieżek rozmywa 
się, odczytuje z niej dane, składa je w pamięci komputera, a następnie 
ponownie formatuje całą Ścieżkę przywracając jej wyraźny kontur. 
Formatowanie odbywa się według specjalnego algorytmu, zapisywana 
jest od nowa cała ścieżka łącznie z identyfikatorami sektorów. Nowo 
zapisana ścieżka jest szczegółowo testowana — tylko po całkowitym 
sprawdzeniu dane wracają na swoje dotychczasowe miejsca. Jeśli powierz- 
chnia dysku okaże się uszkodzona, dane są przenoszone w inne miejsce 
dysku, a wadliwy obszar jest blokowany dla dalszego wykorzystania przez 
DOS. 


Nie tylko ścieżki rozmyte mogą być naprawione przez Disk Technician. 
Każdy pojedynczy bit — zapisany czy nie — jest sprawdzany pod kątem 
jakości zapisu. Wykryte błędy — niepewny poziom namagnesowania, 
zbyt duża „twardość” materiału magnetycznego itp. wyzwalają komplek- 
sowy proces naprawy wadliwego obszaru, zakończony odtworzeniem jego 
zawartości lub przeniesieniem jej na inne miejsce. » 
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Jeszcze jedną, istotną cechą programu jest moduł SafePark. Moduł ten 
instaluje się samoczynnie na twardym dysku, a następnie każdorazowo 
ładuje się do pamięci wraz z systemem operacyjnym. Jego zadaniem jest 
przemieszczanie głowicy nad bezpieczny obszar „„lądowiska” przy każdej 
przerwie między operacjami dyskowymi trwającej dłużej niż ok. 7 sekund 
(czas ten może być zmieniany przez użytkownika). Wstrząsy i przypad- 
kowe zapisy przestają wówczas zagrażać istotnym danym. 


Program Disk Technician sprzedawany jest w cenie 99,95 dol., wymaga 
komputera z systemem operacyjnym PCNS-DOS 2.1 lub nowszym, 256 K 
pamięci RAM i jednym napędem dyskowym 5,25 cala (oczywiście także 
z dyskiem sztywnym). Obsługa nie wymaga żadnych umiejętności — wy- 
starczy włożyć dyskietkę i włączyć komputer. Codzienne użycie programu 
wymaga około minuty — znacznie mniej niż skopiowanie dysku na kasetę 
streamera. Wygląda na to, że nareszcie komputery zaczynają dbać 
o siebie! 


Komputerowy rozmówca 


Nowoczesne biuro to nie tylko komputery, ale również sprawne środki 
komunikacji między ludźmi i między maszynami. Wprawdzie w polskich 
realiach modemy, aparaty telekopiowe (telefaksy) i automaty zgłoszenio- 
we (automatyczne sekretarki) są jeszcze rzadko spotykane, lecz każdy 
chyba użytkownik marzy o posiadaniu wszystkich tych urządzeń na 
swoim biurku. Gdy marzenia te się spełnią pojawia się kolejny problem: 
jak sprawiedliwie podzielić między wszystkie funkcje komunikacyjne 
jedną linię telefoniczną. Najlepiej byłoby połączyć wszystkie urządzenia 
w jedno wraz ze zwykłym telefonem, całość „upchnąć” we wnętrzu 
komputera i dołączyć do telefonicznego gniazdka w ścianie... 


Okazuje się, że nie jest to bynajmniej futurystyczny projekt: takie 
właśnie zalety posiada zintegrowana karta komunikacyjna Orator Link 
oferowana przez firmę Atlantic Office Communications. Stanowi ona 
połączenie modemu, automatycznej sekretarki i zwykłego telefonu, 
a ponadto posiada wiele interesujących funkcji pomocniczych. 


Orator Link ma postać typowej karty rozszerzającej PC — jedyne 
różnice to zamykająca cały pakiet, plastykowa obudowa i dwa telefonicz- 
ne gniazdka na tylnej ściance karty. Jedno z tych gniazdek należy połączyć 
z linią telefoniczną, a drugie z aparatem telefonicznym. Po zainstalowaniu 
karty we wnętrzu komputera można zwyczajnie korzystać z telefonu, bez 
względu na to, czy komputer jest włączony, czy nie. Orator przejmuje 
bowiem kontrolę nad linią telefoniczną tylko wtedy, gdy tego potrzebuje. 
Przygotowania do pracy kończy zainstalowanie programu sterującego 
Orator Manager (na czystej dyskietce lub na twardym dysku). Procedury 


instalacyjne tworzą właściwe pliki AUTOEXEC.BAT i CONFIG.SYS 
lub modyfikują już istniejące. 


Po wywołaniu program Orator Manager pozostaje stale w pamięci 
operacyjnej i pracuje „w tle”. W dowolnej chwili, podczas pracy z innymi 
programami, można przywołać Oratora na pierwszy plan przyciskając 
jednocześnie lewy klawisz Shift, Ctrl i Alt. Ta sama kombinacja klawiszy 
odsyła Oratora ponownie „w tło”. Podczas pracy pierwszoplanowej 
Orator zapewnia bogaty interfejs z użytkownikiem, oparty na okienkach, 
rozwijanych menu i sterowany klawiszami funkcyjnymi. 


Zasadniczym elementem karty Orator Link jest programowany proce- 
sor sygnałowy. W zależności od zastosowanego programu może on 
realizować funkcje modemu w standardach V21, V22, V22bis i V23, 
pracować z szybkościami transmisji 300, 1200 i 2400 bodów, a także 
w niesymetrycznym trybie 1200/75 bodów, wykorzystywanym przez 
brytyjskie publiczne służby informacyjne Prestel. Procesor sygnałowy 
służy także do obsługi komunikacji głosowej: pozwala zapisać sygnał 
mowy w postaci cyfrowej na dysku, jak również odtworzyć zapisaną na 
dysku wypowiedź. Mowa jest próbkowana z częstotliwością 8 kHz 
i kodowana według specjalnych metod kompresji. Pozwala to zapisać 
sekundę mowy na przestrzeni ok. | kilobajta. Uzupełnieniem sprzętowych 
możliwości Oratora jest zegar czasu rzeczywistego. 


Użytkownik komputera wyposażonego w kartę Orator Link może 
utworzyć na dysku katalogi numerów telefonicznych. Ilość katalogów jest 
ograniczona tylko pojemnością dysku, a każdy z nich może zawierać 999 
pozycji. Pojedyncza pozycja zawiera trzyliterowy kod identyfikacyjny, 
nazwę lub nazwisko abonenta, numer telefonu, a także informacje 
pomocnicze: czy wybieranie numeru jest realizowane dekadowo (impul- 
sami) czy częstotliwościowo, czy Orator jest dołączony do linii miejskiej 
czy wewnętrznej, jaką cyfrę trzeba wybrać, by otrzymać dostęp do linii 
zewnętrznej, czy pod danym numerem należy się spodziewać człowieka 
czy komputera itd. W przypadku numerów służb informacyjnych i innych 
komputerów wpisane są też dane o wymaganym protokole, szybkości 
transmisji, sekwencji identyfikacyjnej (/og-on). Numer z katalogu wybiera 
się przez podanie trzyliterowego identyfikatora lub podświetlenie od- 
powiedniej pozycji w menu. 


Po zgłoszeniu się wywoływanego numeru Orator sam rozpoznaje, czy 
ma do czynienia z człowiekiem czy z innym komputerem. Jeśli zgłosi się 
komputer, to z katalogu pobierane są dane o parametrach transmisji, 
następuje inicjalizacja funkcji modemowych, wysłanie zdefiniowanej 
przez użytkownika sekwencji identyfikacyjnej i rozpoczęcie automatycz- 
nej wymiany danych. Jeśli zgłosi się człowiek Orator wezwie odpowiednim 





jących oprogramowanie mikro- 
komputerów opracowała własne 
implementacje języka Pascal. 
Coraz łatwiejszy dostęp do 
komputerów osobistych spra- 
wia, że znacznie poszerzył 
się krąg ludzi wykorzystują- 





dzajach usług udostępnianych Naukę ułatwia też układ tre- 
na poszczególnych poziomach ści podręcznika — w pierw- 
programowania (sprzęt, system szej jego części wprowadzo- 
operacyjny, język wysokiego po- no tylko najprostsze elementy 
ziomu). Autor przekazał tu języka, omawiając je jednak 
minimum wiedzy niezbędnej od podstaw, gruntownie, a przy 
nowicjuszom nieobeznanym tym jasno i precyzyjnie. Lektura 


Ryszard K. KOTT, PROGRAMO- 
WANIE W JĘZYKU PASCAL, Wy- 
dawnictwa  Naukowo-Technicz- 
ne, Warszawa 1988. Nakład 
30000 egz., wydanie pierwsze, 
cena: zł 780. 


Język Pascal, pomyślany przez 
swego twórcę, Niklausa Wirtha, 
jako li tylko narzędzie do nauki 
dobrego; strukturalnego progra- 
mowania, zdobył sobie w ciągu 
ostatnich lat ogromną popular- 
ność. Pascal jest obecnie pod- 
stawowym językiem kształcenia 
informatyków, jest także języ- 
kiem powszechnie używanym 
w publikacjach do opisu algoryt- 
mów, struktur danych, reguł po- 
stępowania, itp. Kompilatory Pa- 
scala dostępne są we wszystkich 
praktycznie instalacjach kompu- 
terowych,  minikomputerowych 
i mikrokomputerowych. Więk- 
szość poważnych firm produku- 
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cych te implementacje i uważa- 
jących je za wygodne, nowocze- 
sne i silne narzędzia programi- 
styczne. 

Na polskim rynku księgarskim 
ukazało się sporo pozycji oma- 
wiających poszczególne imple- 
mentacje języka Pascal, dostę- 
pne są także książki zawierające 
opis języka, brakowało jednak 
podręcznika przeznaczonego do 
praktycznej nauki programowa- 
nia w Pascalu. 

Ryszard K. Kott podjął próbę 
stworzenia takiego podręcznika, 
czego efektem jest recenzowana 
książka: 

Rozpoczyna ją omówienie 
wstępnych, podstawowych pojęć 
programowania (takich, jak algo- 
rytm, język programowania, pro- 
gram, programowanie). Nieco 
uwagi poświęcono procesom 
translacji i interpretacji progra- 
mów, wyjaśniono różnice w ro- 


z techniczną stroną programo- 
wania. Przedstawienie dwóch 
metajęzyków definiowania języ- 
ków programowania (upraszcza- 
jąc: formalnych sposobów za- 
pisu definicji), t.j.: notacji Bac- 
kusa-Naura (BNF) oraz diagra- 
mów składniowych kończy pierw- 
szy, przeznaczony dla absolut- 
nych nowicjuszy, rozdział podrę- 
cznika. 

Bogato komentowane diagra- 
my składniowe są konsekwentnie 
stosowane w pozostałych roz- 
działach książki do definiowania 
wprowadzanych kolejno, w logi- 
cznym porządku, pojęć i konstru- 
kcji języka Pascal. Graficzne zob- 
razowanie elementów języka 
i reguł składni ułatwia ich zro- 
zumienie w takim stopniu, iż mo- 
im zdaniem, nawet początkujący 
nie powinni mieć kłopotów z przy- 
swojeniem prezentowanego ma- 
teriału. 


choćby tylko tej części powin- 
na już umożliwić czytelnikowi 
samodzielne pisanie nieskom- 
plikowanych programów w Pas- 
calu. 

Druga część podręcznika 
wprowadza pozostałe, bardziej 
złożone pojęcia oraz zawiera 
uzupełnienia i rozszerzenia, 
omówionych w części pierwszej 
fragmentów konstrukcji języka 
Pascal (całość opisu języka Ści- 
śle odpowiada międzynarodowej 
normie ISO nr 7185). 

Książka Ryszarda K. Kotta 
w pełni zasługuje na miano pod- 
ręcznika programowania. Praca 
zawiera bowiem nie tylko kom- 
pletny opis języka, ale także omó- 
wienia zastosowań (i ograniczeń 
stosowalności) kolejno wprowa- 
dzanych konstrukcji językowych 
oraz wskazania celów, dla reali- 
zacji których te konstrukcje są 
szczególnie użyteczne. Autor po- 


sygnałem dźwiękowym operatora do podniesienia słuchawki i rozpoczęcia 
rozmowy — oczywiście za pośrednictwem procesora sygnałowego karty. 


Kartę Orator Link można zaprogramować do obsługi połączeń 
przychodzących. Każde wywołanie pochodzące z innego komputera 
spowoduje nawiązanie automatycznej wymiany danych. Na telefon od 
człowieka Orator może zareagować odtworzeniem zapisanego na dysku 
komunikatu głosowego, a następnie zarejestruje (poprzez próbkowanie 
i kodowanie) wypowiedź rozmówcy na dysku opatrując ją etykietką 
z czasem i datą. 


Wszystkie funkcje Oratora mogą być aktywowane przez wbudowany 
zegar o określonych, wstępnie zaprogramowanych porach. Można więc 
np. zlecić komputerowi, by o danej godzinie zadzwonił do określonej 
osoby i przekazał jej wiadomość syntetycznym głosem. Można też 
wykorzystywać nocne zniżki taryf telefonicznych, programując Oratora 
tak, by w środku nocy połączył się z innym komputerem i przekazał mu 
dane. 


Zapisywanie komunikatów głosowych w postaci cyfrowej jest proste 
— wystarczy wybrać menu ,„Rejestracja wiadomości ”, podać nazwę pliku, 
wcisnąć klawisz spacji i zacząć mówić do mikrotelefonu. Natychmiast po 
nagraniu można je odsłuchać w słuchawce. Syntetyczna mowa Oratora 
jest wprawdzie lekko bulgocząca — tak jak np. głos nurka spod wody 
— lecz w pełni zrozumiała. 


Karta Orator Link ma możliwość zdalnego sterowania. Wyposażony 
w nią komputer może o dowolnej porze połączyć się zinnym komputerem 
posiadającym kartę Orator, a następnie korzystać z jego zasobów 
sprzętowych i plików jak ze swoich własnych. Realną perspektywą jest 
więc korzystanie z mocy obliczeniowej firmowego komputera z własnego, 
domowego PC po godzinach pracy. Ochrona przed niepowołanym 
dostępem jest zagwarantowana systemem haseł. 5 


Wszystkie te cechy karty Orator Link sprawiają, że jest ona jedną 
zciekawszych propozycji na rynku brytyjskim. Mimo że możliwość zapisu 
i odczytu mowy może jeszcze dziś wydać się egzotyczna, to jednak cena 
795 funtów jest interesująca nawet wtedy, gdy traktuje się Oratora 
wyłącznie jako wielozadaniowy modem z działającym w tle oprogra- 
mowaniem komunikacyjnym. Czekamy więc na pierwsze Oratory homo- 
logowane i pracujące w Polsce. 


Opracował: Janusz Wrześniak 
A 


dał sposoby tworzenia efektyw- 
nych i eleganckich algorytmów, 
zamieścił także uwagi dotyczące 
organizacji struktur danych. Go- 
dna pochwały jest konsekwencja, 
z jaką starał się wyrobić u czytel- 
nika nawyki dobrego programo- 
wania. 

Cały wykład jest bogato ilust- 
rowany przykładami typowych 
zastosowań elementów języka 
Pascal. Na uwagę zasługuje spo- 
sób prezentacji przykładów: kla- 
rowne sformułowanie problemu, 
jasne (choć niekiedy zbyt skróto- 
we) przedstawienie algorytmu 
rozwiązania i wreszcie takst 
w Pascalu — egzemplifikacja do- 
brego stylu programowania. 

Każdy rozdział kończy się py- 
taniami i zadaniami będącymi, 
w mojej opinii, cenną pomocą 
przy samodzielnym studiowaniu 
podręcznika, tym bardziej, że Do- 
datek 1 zawiera rozwiązania tru- 
dniejszych zadań. 

Pozostałe dodatki obejmują: 
© listę obiektów predefiniowa- 

nych języka Pascal, 
© zbiór diagramów  składnio- 

wych języka (wszystkie w je- 
dnym miejscu!), 


© pełną definicję składni języka 

— wyciąg z angielskojęzycz- 

nego oryginału normy języka 

(Autor zatroszczył się o słow- 

niczek). 

Książkę uzupełnia spis litera- 
tury (każdej pozycji towarzyszy 
jednozdaniowe objaśnienie za- 
wartości) oraz skorowidz rzeczo- 
wy. 

Podręcznik przeznaczono, 
zgodnie ze słowami Autora 
„„..przede wszystkim dla począt- 
kujących, a także osób, które ze- 
tknęły się już z programowaniem 
w prostych językach, takich jak 
BASIC czy Fortran''. Ja zaś pole- 
całbym ten podręcznik także tym 
wszystkim, którzy chcieliby za- 
znajomić się z zasadami dobrego 
programowania. 

Książkę wydano starannie, 
szkoda tylko, że na papierze kie- 
pskiej jakości i w dość skromnym 
nakładzie. 


(asd) 


ALGORYTM WYZNACZANIA 
WSPOŁRZĘDNYCH SŁONCA, 
KSIĘŻYCA I PLANET 


(CZĘŚĆ 1) 


W poprzednim odcinku zamieściliśmy algorytm po- 
zwalający wyznaczyć współrzędne równikowe Słońca 
i Księżyca. Teraz podamy sposób obliczania tych współ- 
rzędnych dla Merkurego, Wenus i Marsa. Kolejne kroki 
postępowania są podobne do wykonywanych poprze- 
dnio. Korzysta się również z tych samych współczyn- 
ników J1,...,J33. W tabelach 4, 5, 6 zamieszczono elemen- 
ty pozwalające zbudować kolejne człony wyrażeń DL, 
DBi DR — odpowiednio dla Merkurego, Wenus i Marsa 
według schematu podanego dla Słońca. 

UWAGA: Obliczając wartości funkcji trygonometrycznych 
współczynników J1 do J33 należy przedtem pomnożyć je przez 
wartość 2*PI. 

Poprawność konstrukcji tych wyrażeń można spraw- 
dzić porównując wartości liczbowe. Dla daty 28 czerwca 
1969 roku (tej samej, dla której wyznaczyliśmy już 
współczynniki J1,....J33) powinny one wynosić: 


DL DB DR 
Merkury —84564.1 —23166.8  0.37873 
Wenus —860.3 —11478.2  0.72810 
Mars —35479.2  —3900.8  1.46455 


Wartości te posłużą do dalszych obliczeń. Warto 
jednak zaznaczyć, że DR jest odległością planety od 
Słońca wyrażoną w jednostkach astronomicznych. 

Dla każdej z planet należy teraz obliczyć wartość LR, 
która wynosi: 
dla Merkurego LR = (DL/3600)+*S + 2:*PI+:J9 + DLR, 
dla Wenus LR = (DR/3600)+S + 2*PI-J12+ DLR, 
dla Marsa LR = (DL/3600)=S + 2*PIxJ15+ DLR, 
gdzie DLR = —17+*SIN(J5*2+x*PI)/3600*S, S podobnie 
jak poprzednio jest równe PI/180. Należy zwrócić uwagę, 
by wartość DL obliczona była dla danej planety. 

Jeśli LR jest ujemne, to dodajemy do niego 2+*PI (LR 
Jest wyrażone w radianach), procedurę powtarzamy aż 
uzyskamy LR dodatnie. 

Dalsze postępowanie, prowadzące do wyznaczenia 
rektascensji « i deklinacji 0, jest już wspólne dla wszyst- 
kich planet. Obliczamy kolejno: 

T2 =(JD—2415020)/36525 
EP = 23.452294 — 0.0130125*T2 — 1.6410 **T2+*T2+ 
+ 5.03*1077*T2*T2*T2 


UWAGA! ERRATA! 
1. W poprzednim odcinku wzór na EP zamieściliśmy z dwoma błędami — powyżej 
jego poprawna postać. 
2. Przy obliczaniu wartości funkcji trygonometrycznych należy przedtem współczyn- 
niki J pomnożyć przez 2::PI. 
3. W wyrażeniu na DL dla Słońca powinno być COS(J8 — J9). 
Czytelników przepraszamy za błędy. 


DBR = (DB/3600)+S 
EPR = EPxS 

X1 =DR*xCOS(DBR)*COS(LR) 

X2 = DR*COS(DBR)+SIN(LR) 

X3 = DR+*SIN(DBR) 

X4=X1+XS 

X5=X2+COS(EPR) — X3*SIN(EPR) +YS 
X6 = X2*SIN(EPR) + X3*COS(EPR) + ZS, 
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gdzie zamiast XS,YS,ZS należy podstawić obliczone 
w poprzednim odcinku wartości X4, X5, X6 dla Słońca. 

Obliczenie rektascensji a 
« = arctg(X5/X4)/S, 
gdy X5<0i1X4>0 to a«a=a+360 
gdy X5<0i1X4<0 to a=a+180 
gdya<0 to a=a+180 
« =«/15, tj. będzie wyrażone w godzinach i w ułamkach 
godziny. Ułamek ten możemy zamienić na minuty 
i sekundy. 

Obliczenie deklinacji 6 

0 =arctg(X6/(X4*X4 + X5xX5)10.5)/8, 
gdzie symbol 7 oznacza potęgowanie. 
Deklinacja wyrażona jest w stopniach i zawiera się 
w przedziale (—90”, +90”). 

Czytelnik zauważył zapewne, że postępowanie prowa- 
dzące do wyznaczenia współrzędnych równikowych pla- 
net jest w kilku fragmentach (nie w całości!) identyczne 
z zamieszczonym w poprzednim numerze. Jednak w celu 
uzyskania przejrzystości algorytmu przytoczyliśmy go 
w całości. 

Porównanie obliczonych współrzędnych (TEST) z po- 
danymi w Roczniku Astronomicznym (ROCZNIK) 


Merkury 

TEST ROCZNIK 
LR/S ZAS SI 341" 15/59" 
DBR/S —6 26 07” —6* 26 17" 
DR 0.37873 0.37869 
OL 4: 53m 455 4* 53m 435 
0 +19" 55' 16” +19” 55' 16” 

Wenus 

TEST ROCZNIK 
LR/S 326-227116" 326 22' 05” 
DBR/S —311' 187 —3 11/22" 
DR 0.72810 0.72808 
OL 3846732: 3* 16% 303 
0 +15 05' 44" +15 05 48” 

Mars 

TEST ROCZNIK 
LR/S 265” 04 50” 265” 04 54" 
DBR/S —1 05/01” —1 04 53" 
DR 1.46455 "  1.46463 
oL 15* 58m 415 15* 48m 435 
0 —23? 43' 45" — 23? 43' 07” 


Algorytmy, które pozwolą obliczać współrzędne dal- 
szych 'planet Układu Słonecznego zamieścimy w kolej- 
nych numerach „„InforMika”. Niezależnie od tego wątku 
chcielibyśmy zamieszczać również przepisy pozwalające 
np.: wyznaczać momenty wschodów i zachodów ciał 
niebieskich, określać ich widoczność itp. Współrzędne 
stanowią dla nich punkt wyjściowy. Wszystkie te zjawiska 
rozgrywają się w czasie, dlatego pojęcie czasu jest bardzo 
istotnym zagadnieniem w astronomii. Poświęcimy mu 
teraz kilka uwag. 

Podstawową jednostką czasu jest doba. Dobą nazywa- 
my odstęp czasu, w którym Ziemia dokonuje jednego 
pełnego obrotu wokół swojej osi względem pewnego 
punktu na sferze niebieskiej. Długość doby zależy od 
tego, względem jakiego punktu określa się okres obrotu 
Ziemi. Za punkty określające długość doby przyjmuje się: 
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Tabela 4 (dla Merkurego) 


E: HW AO RZA 
Liczba! T Funkcja „15 ,I7 ,J8 ,J13 715,J16,717 JI9, 


DL 
238451 0 SIN 040167 GO FIO JEOMOE 
2238 0 SIN GG "Bi „dia TZN ACEJ 
181 © SIM 5 LG ZT6 0 a7 PONO: 
-52 0 SIN © 0! Jóri0//0 (07 REWON 
7 1 _ SIN RECE NETS" CG AWÓ GT FNM 
-22 0 COS ©: +0 GQ. > UBz=71 GIZA 
-19 0- SIN 0-05 no 1026 Jody =" 
17-0 _ 608 5.060 001 6 = MOŻNA 
! 17. ©"-51N OWO 1671009 4UOBOJTZOĄ 
-16 0 COS BE (667 9. 2750284 
13 0 cos b: „WEG ZEA GGOĆ| 
j -10 0 SIN 0. 06-10= 109806 m, S2u07+] 
i -10 0 SIN 0-04 -GAFGD BU ETA sIZ 0] 
ł Zui0 AEUS Q: "0:01 416 260 1 05 -9027 
i =7 16. 605 B=" 270" UOE=2=—0) OG] 
: -5 0 SIN 0: POOEG JT ADKO GA CG CG 07 
i -5 0 SIN (ia 008 1DWOS MO ="" 6700 4] 
i -5 0 SIN GOW M WDNUOZEZW CAGE 
I -4 0 COS DEO 2 0. 00406 BI 
i 4 1 SIN DWADECO NAC GE 2 QE 
i 46: mię08 RA AOFTWEO NOW Sg (016 I 
j S"'9-<1GU6 DORBEMIGI WT 223 03 0] 
I 38 0 SIN 0: 8050: Wok dow 2 (0 Z] 
ja 
DB i 
| 6603 0 SIN © 5677 91 10IENO Qi 
622 O SIN 6 76% 107 TOMY „EJ* 267] 
615 0 SIN 6,50) 09 00 JOSE oi 
64 O SIN 0-6 WOLE GZ 0: i 
a | 
| 1.5808] 0 COS 0107.02 706 05048 JOTKGZI 
j-0.14170 0 COS 0:0 AÓCZA ZB SUOSZKÓWĄ 
|-0.00660 0 COS 0 +09-0/ 463 ug Of2Eo0: ort 
|-0.00047 0 CoS S-Plgr=o | = 1OBET2 (0, 10 


Tabela 5 (dla Wenus) 


EA EŃ EIN EEEE SEDANA, 
Liczba! T|Funkcja JI |JS .J7 „18 ;312,313,J14,316 ,J19, 


i j 
| DL i 
; 2814 0 SIN Gór 16) 00 0 Wh 60 0 i 
-181 0 SIN W J0G0  B_ 0770 PZNNM="GU] 

-20 1 SIN BSUBOPAS UOR "0, MADA OPAC 

i 12 0 SIN 0 MIG=M 10) 062" „010070 j 
Ę -10 0 COS 6-0 30: 2, 0 225 0a 204 
i 7 o cos 0166 00:71 :69 =0KOEWIORYST 
co | 
12215 SIN o o o o i 

: 83 0 SIN G4%.07 W SSOROZNE KEGLGOFOKI 
83 0 SIN 0207-6460 41 AMONG 

| ALLZARI ZO ESTEE ii GR COW RCIE i 
|  9R i 
| 0.72885 0 COS 0-67 16 0240 ZONAOABOEON 


|-0.00493 0 COS 6 00: POTEGO NATO WZO AG 








Tabela 6 (dla Marsa) 


35 oRosiuweam r) saw na SP ADR RI |©4 
Liczba, T,Funkcja ,J] „JS ,J7 JE ,J9 ,710,911,313,716,J19, 


zka zz 














1 
: Ę 
[a 
|- 9437810080]. © "al ©0g gr *8- 50. 104,6: 6 śB.] 
| 10733 0 SIN 4. . 6 20606 ZZO Mura KO | 
i 1892 0 SIN OWECINOW SE 080760 0176) 0:4 
|  -546 0 SIN DRO LO ZE BY 10T 0, | 
i 381 O SIN SRO! "0970 0040401 W” -.DL GU] 
|  -306 0 SIN 0 Porowot=engigz (60-0- BER 
| -274 0 SIN DIES OW O "0 RR BOTĘ ryj 
i -92 0 SIN BSD 0020 M 2SZ2 Mao 16. -5::] 
i 83 © SIN © FADE "FE 60 BK 1 Bt 
| -28 0 SIN Bu-B etu -0- © raRŻA 67 (004 
i 25 O SIN BFRGOWA MGS". Z SE M0PUGZMO 
19 0 SIN SBE MPM 646 Gg 20 NE MET: 
=96 "STM Ą „dszibw10., Gy 4: PZA005=-87 04 
! 8 1 SIN BenQaadn "OG OT" 407 DU Ę 
| 70 6BDE ORO a saS<00-2, 46 5200 0; 
| DB. i 
| 24314 O SIN O EKCYRACONCMCAE OSK EET 
j 5180 O SIN Pa WBU 20175116 6-0 
| 4910 O SIN 8 00%, OR 1. (1.4BoaOG NOCI 
| 1124 0 SIN RABIN KG "0 2 1 1 N6ŃSAĄ 
i 271 0 SIN BOO PORAD ÓW 0 A 09 (0.z0i 
i 132 0 SIN Do DOO" 0 a ZEE BO IA 
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— punkt równonocy wiosennej dla czasu gwiazdowego, 
— Słońce ,„prawdziwe” dla prawdziwego czasu słonecz- 


nego, 
— Słońce „średnie równikowe” dla czasu średniego 
słonecznego. 


Odstęp czasu między dwoma kolejnymi kulminacjami 
górnymi (lub dolnymi) punktu równonocy wiosennej 
nazywamy dobą gwiazdową. Początek doby gwiazdowej 
na danym południku przypada na moment kulminacji 
górnej punktu równonocy wiosennej. Czas liczony od 
początku doby gwiazdowej nosi nazwę czasu gwiaz- 
dowego. 

Z kolei odstęp czasu między dwoma kolejnymi kul- 
minacjami górnymi (lub dolnymi) środka widomej tarczy 
Słońca jest prawdziwą dobą słoneczną. Początek praw- 
dziwej doby słonecznej przypada na moment kulminacji 
dolnej Słońca, a czas liczony od początku prawdziwej 
doby słonecznej nosi nazwę prawdziwego czasu słonecz- 
nego. 

Z uwagi na to, że Słońce prawdziwe porusza się po 
ekliptyce a nie po równiku i w dodatku ze zmienną 
prędkością, to czas trwania dób prawdziwych słonecz- 
nych nie jest stały w ciągu roku; zimą prawdziwa doba 
słoneczna jest dłuższa niż latem. 


Dlatego wprowadza się pojęcie punktu matematycz- 
nego poruszającego się ruchem jednostajnym po równiku 
niebieskim, nazywając go Słońcem średnim. Odstęp czasu 
między dwoma kolejnymi kulminacjami górnymi (lub 
dolnymi) średniego Słońca równikowego jest więc średnią 


dobą słoneczną. Początek średniej doby słonecznej przy- 
pada na moment kulminacji dolnej Słońca średniego. 
Czas liczony od początku średniej doby słonecznej jest 
więc czasem średnim słonecznym. Różnicę między cza- 
sem średnim słonecznym a czasem prawdziwym słonecz- 
nym nazywamy równaniem czasu. 

Czas gwiazdowy, czas prawdziwy słoneczny i czas 
średni słoneczny dla danego południka nazywamy od- 
powiednio miejscowym czasem gwiazdowym, miejsco- 
wym czasem prawdziwym słonecznym i miejscowym 
czasem średnim słonecznym. Miejscowy czas średni sło- 
neczny dla południka Greenwich to czas uniwersalny 
(UT). Miejscowy czas średni słoneczny dla dowolnego 
miejsca na powierzchni Ziemi można obliczyć ze wzoru: 

TM =UT-+-L, 

gdzie L jest długością geograficzną danego południka 
wyrażoną w mierze czasowej i liczoną w kierunku na 
wschód od południka zerowego przechodzącego przez 
Greenwich. Czas obowiązujący w danym kraju nazywa- 
my czasem urzędowym. W naszym kraju obowiązują dwa 
czasy, latem — czas letni (czas wschodnioeuropejski 
CWE. tj. czas uniwersalny, UT powiększony o 2 godziny), 
zimą — czas zimowy (czas środkowoeuropejski CSE, tj. 
czas uniwersalny, UT powiększony o I godzinę). 

Położenia Słońca, Księżyca i planet obliczane są w opa- 
rciu o teorie ich ruchu, gdzie czas jest wielkością niezależ- 
ną i płynie jednostajnie. Ten czas nazywamy czasem 
efemerydalnym (ET). Wskutek niejednostajności ruchu 
wirowego Ziemi występują różnice między czasem efeme- 
rydalnym ET a czasem uniwersalnym UT. 

dT=ET—UT, 
gdzie dT można obliczyć zgodnie z J. Meeusem wg 
wzoru: 
dT = 0.00084:+T + 0.000347xT=T, 
a T oznacza ilość stuleci od roku 1900. 
A oto niektóre wartości dT: 


Rok dT 
— 1000 0.267 

— 500 0.180 

+ 500 0.056 
+ 1000 0.021 
+ 1500 0.002 
+ 2100 0.003 
+ 2500 0.018 
+ 3000 0.051 


(dT wyrażone jest w dobach). 
Poprawkę dT można dokładniej obliczać wg L. Schma- 
dela (dokładność | sek.), ale za to tylko w przypadku 
lat 1800—1988. A oto wyrażenie: 
dt = —0.000014+0.001148-xT + 0.003357:xT* — 
—0.012462xT* —0.022542+:T* +0.062971xT> + 
+0.079441 xT* —0.146960T" —0.149279:xT* + 
+0.161416%xT" +0.145932+:T'" — 
—0.067471xT"' —0.058091xT">, 
gdzie dT wyrażone jest w sekundach natomiast T, jak 
poprzednio, w stuleciach od 1900 r. 
W naszych algorytmach przykładowych obliczeń doko- 
nujemy dla 28 czerwca 1969 r. godz. ( czasu efemerydal- 
nego, czyli dla 27 czerwca 23 godz. 59 min. czasu 
uniwersalnego, tj. dla 28 czerwca 1969 r. 0 godz. 59 min. 
czasu środkowoeuropejskiego. 


Opracował: IRENEUSZ WŁODARCZYK 
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SEE TESEWIWARTUM INFORMA" | 
ZX-y INACZEJ 


JANUSZ MŁODZIANOWSKI 


Czy pamiętacie Państwo zamierzchłe 
czasy ery mikrokomputerowej? Zacznijmy 
więc od szybkiego przypomnienia. W sty- 
czniu 1980 w brytyjskiej firmie Sinclair 
Research Ltd. opracowano pierwszy popu- 
larny mikrokomputer domowy o nazwie 
ZX80. Pomimo wcześniejszych przypusz- 
czeń o znikomym zbycie ZX80 do końca 
września tegoż roku sprzedanych zostało 
ponad 20000 urządzeń. W marcu 1981 
powstał następca ZX80 nazwany ZX81. 
Mikrokomputer ten rozpoczął istną eks- 
plozję mikroinformatyki stając się w tym 
czasig najpopularniejszym i najtańszym 
komputerem świata. Do lutego firma Sinc- 
lair wyprodukowała ok. 500 000 urządzeń. 
W tym samym czasie w USA sprzedawano 
około 15000 mikrokomputerów miesięcz- 
nie. O tempie rozwoju rynku mikrokom- 
puterowego może świadczyć fakt, że 
w kwietniu 1982 na Earls Court Computer 
Fair w Londynie ponad 30 niezależnych 
firm prezentowało programy i dodatkowy 
sprzęt do ZX81. Sama firma Sinclaira, 
licząca początkowo 19 osób, stała się jedną 
z najbardziej dochodowych w Wielkiej 
Brytanii. I tak np. rok 1982 zamknął się 
zyskiem ok. 30 mln funtów, dla porówna- 
nia rok poprzedni przyniósł tylko 4,6 mln. 
Rozwijająca się od razu konkurencja firm 
takich jak: Acorn, Apple, Commodore 
i innych spowodowała, że Sinclair nie po- 
przestał na ZX81 ale podjął pracę nad 
kolejnymi wersjami mikrokomputera, któ- 
re powszechnie znane są jako seria ZX 
Spectrum. Niestety, niepowodzenia rynko- 
we pojazdu elektrycznego C5 oraz kolej- 
nego dziecka Sinclaira, mikrokomputera 
QL, spowodowały konieczność odprzeda- 
nia praw autorskich do ZX Spectrum kole- 
jnemu przeciwnikowi — firmie Amstrad. 
Również w Polsce dały się zauważyć echa 
rewolucji mikrokomputerowej. Wiele po- 
wstających wówczas firm prywatnych i po- 
lonijnych zaczęło oferować ZX81, a póź- 
niej ZX Spectrum. Sektor państwowy gos- 
podarki jak gdyby nie zauważył potencjal- 
nego rynku zbytu i bardzo długo zabierał 
się do rozpoczęcia produkcji. W chwili 
obecnej na naszym rynku dostępny (?) jest 
mikrokomputer edukacyjny Elwro 800 Ju- 
nior. Mikrokomputer ten posiada dwa 
tryby pracy. Pierwszy tryb zapewnia zgo- 
dność programową z systemem ZX. Drugi 
tryb pracy umożliwia współpracę wielu 
komputerów .w sieci jak też korzystanie 
z systemu operacyjnego CP/] (zgodnego 
z CP/M 2.2). 

W roku 1981 do akcji wkroczył gigant: 
amerykańska firma International Business 
Machines Ltd., czyli IBM, wprowadzając 
na rynek komputer o nazwie IBM PC. Jak 
to zwykle bywa z wielkimi koncernami sa- 
ma nazwa tworzy standard. IBM opubli- 
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kował wszystkie dane dotyczące kompute- 
ra. Cały Świat rzucił się na produkcję 
maszyn „zgodnych z IBM”. W technice 
powielania (i sprzedawania) najlepszy oka- 
zał się Daleki Wschód. Niewiele czasu 
upłynęło i sprzęt klasy IBM zaczął docierać 
do Polski i wypierając urządzenia „„nie- 
kompatybilne z IBM” stał się nieoficjal- 
nym standardem mikrokomputera. I w ten 
to sposób doszliśmy do czasów współcze- 
snych. Era Sinclaira należy do archeolo- 
gów. Ale czy tak musi być? Pamiętajmy, że 
w Polsce, tylko w rękach prywatnych znaj- 
duje się kilkaset tysięcy mikrokomputerów 
ZX! Nie zapominajmy o nich! Nie każdego 
bowiem stać na podążanie za trendami 
światowymi (i modą!) i zakup „Big Blue”, 
którego cena nierzadko jest wyższa od ceny 
dobrego samochodu. Ponadto, jak mówi 
stare przysłowie programistów, komputer 
jest tyle wart, ile osoba go używająca. 
Nieprawdą jest że Spectrum, ZX81 czy 
Junior nie nadają się do niczego. Nie 
zawsze bowiem należy stosować armatę do 
przybijania gwoździ... W kolejnych odcin- 
kach pragniemy pokazać nowe spojrzenie 
na mikrokomputery ZX, mamy również 
nadzieję, że przekonamy Czytelników, iż 
warto jednak wyciągnąć z szafy starego, 
zakurzonego ZX i zaprząc go do pracy. 
Zanim jednak przejdziemy do konkretnego 
przedstawiania, co i jak można zrobić 
z mikrokomputerami ZX, pragniemy prze- 
strzec wszystkich „„majsterkowiczów ”. In- 
gerencja .,z lutownicą” w jakikolwiek 
układ elektroniczny, a zwłaszcza mikro- 
procesorowy, jest zawsze związana z mo- 
żliwością jego uszkodzenia. Użytkowniko- 
wi nie mającemu wprawy i dopiero po- 
czątkującemu w technice cyfrowej odra- 
dzamy eksperymenty!!! Utrata sprzętu mi- 
krokomputerowego, nawet ZX81, jest za- 
wsze nieprzyjemna i kosztowna. 

Proponowane przez nas udoskonalenia 
ZX-ów można podzielić na kilka grup: 
— usprawnienia konstrukcji komputera 

(dotyczy głównie ZX81), 
— budowa prostych interfejsów, 
— tworzenie oprogramowania, 
— podłączanie urządzeń wejścia/wyjścia 
do mikrokomputera. 

Oczywiście przedstawiane rozwiązania 
i konstrukcje nie są jedynymi z możliwych 
i użytkownik po zapoznaniu się z propono- 
wanymi pomysłami może dojść do wnios- 
ku, że do jego konkretnych celów właściwa 
byłaby inna wersja udoskonalenia. 


CHARAKTERYSTYKA 
MIKROKOMPUTERÓW ZX 


Mikrokomputery ZX odznaczają się 
wielką prostotą konstrukcji i właśnie ta 
cecha stanowi ich ogromną zaletę. Urzą- 
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dzenia te można traktować jako uniwersal- 

ne mikrokomputery jednopłytkowe. Po 

kilku prostych przeróbkach sprzętowych 

i odpowiednio oprogramowane nadają się 

świetnie do rejestrowania danych, np. 

z woltomierzy, do sterowania urządzeń 

oraz wszędzie tam, gdzie są wykonywane 

proste czynności lub obliczenia. 

W skład systemu mikrokomputerowego 
ZX wchodzą: 

— mikrokomputer z klawiaturą, 

— telewizor, 

— dowolny magnetofon działający jako 
pamięć, 

— minidrukarka (lub dowolna drukarka 
z interfejsem), 

— zasilacz sieciowy. 

Sam mikrokomputer ZX składa się z kil- 
ku bloków funkcjonalnych: 

— mikroprocesora, 

— pamięci stałej ROM, 

— pamięci operacyjnej RAM, 

— układów towarzyszących: modulatora 
TV, stabilizatora i układu logicznego 
ULA. 

Jednostką centralną mikrokomputerów 
ZX jest mikroprocesor Z-80A. Procesor 
wykonując ściśle określone instrukcje 
stanowiące tzw. system operacyjny umo- 
żliwia komunikowanie się z operatorem 
i wykonywanie napisanych przez niego, 
zwykle w języku wysokiego poziomu, pro- 
gramów. 

Generator podstawy czasu mikrokom- 
putera ZX81 jest stabilizowany rezonato- 
rem ceramicznym 6,5 MHz. Generowany 
przez niego przebieg, po podzieleniu przez 
dwa (3,25 MHz), jest dostarczony do wej- 
ścia CLK procesora. Zegar ZX Spectrum 
o częstotliwości 14 MHz jest stabilizowany 
rezonatorem kwarcowym. Po podzieleniu 
przez 2, częstotliwość 7 MHz steruje ukła- 
dem wizji. Kolejny podział przez 2 (3,5 
MHZ) daje właściwy takt procesora. Prze- 
bieg ten jest okresowo wstrzymywany 
przez układ ULA. 

Mikrokomputer ZX81 jest wyposażo- 
ny w pamięć ROM o pojemności 8 KB, 
w której jest zapisany program działa- 
nia i interpreter języka BASIC. ROM 
rezyduje w adresach  0000h...1FFFh 
(XXXXh oznacza liczbę zapisaną w po- 
staci szesnastkowej). Statyczna pamięć 
operacyjna standardowo o pojemności 
| KB (wersja amerykańska Timex 1000 
— 2 KB) zajmuje obszar od 4000h i może 
być rozszerzona do 56 KB przez dołączenie 
zewnętrznej pamięci — najczęściej dynami- 
cznej. 

Pamięć stała ZX Spectrum ma pojem- 
ność 16 KB i zajmuje obszar 
0000h...3FFFh. Minimalna pamięć RAM 
o pojemności 16 KB (ZX Spectrum 16K) 
może być wewnętrznie rozbudowana do 48 
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KB (ZX Spectrum 48K i ZX Spectrum +-). 
Wersja ZX Spectrum 128K ma stronicowa- 
ną pamięć o łącznej pojemności 128 KB. 
Całość systemu ZX uzupełnia wysoko 
specjalizowany układ logiczny ULA, który 
umożliwia komunikację z urządzeniami 
wejścia/wyjścia oraz zapewnia poprawną 
pracę całego systemu. Układ ULA od- 
powiada funkcjonalnie ok. 20 układom 
scalonym, w które był wyposażony ZX80. 
Układ ULA mikrokomputera ZX Spect- 
rum jest bardziej rozbudowany. Zawiera 
m.in. układ sterujący wyświetlaniem ob- 
razu TV i generator dźwięku. Pierwsze 
wersje układu ULA (issue 1) były wykona- 
ne z błędem, który był korygowany dodat- 
kowym układem 74LS00. Wersje kolejne 
wymagały dodatkowego zewnętrznego 
tranzystora. Wszystkie sygnały sterujące 
pracą systemu ZX są wyprowadzone na 
złącze krawędziowe dostępne dla użytkow- 
nika. Rozmieszczenie poszczególnych syg- 
nałów na złączu systemowym ZX81 i ZX 
Spectrum przedstawione jest na rys. 1. 
Większość linii złącza systemowego stano- 
wią sygnały kontrolne procesora i tak: 


A0. .A15 (ZX 81, ZX Spectrum): wyjście, 
16-bitowa szyna adresowa mikroprocesora 
Z80. Pozwala adresować bezpośrednio 
65 536 komórek pamięci. 


DO..D7 (ZX81, ZX Spectrum): 8-bitowa 
dwukierunkowa szyna danych procesora 
Z80. Szyna danych służy do przesyłania 
informacji pomiędzy poszczególnymi ukła- 
dami mikrokomputera. 


//RD (ZX81, ZX Spectrum): wyjście. Sy- 
gnał odczytu informacji z pamięci bądź 


układów wejścia/wyjścia mikrokompute- 
ra. 


//WR (ZX81, ZX Spectrum): wyjście. Sy- 
gnał zapisu informacji do pamięci bądź 
układów wejścia/wyjścia mikrokompute- 
ra. 

// MREQ (ZX81, ZX Spectrum): wyjście. 
Sygnał informujący o odwołaniu się proce- 
sora do pamięci. 


/AORQ (ZX81, ZX Spectrum): wyjście. 
Sygnał informujący o odwołaniu się proce- 
sora do układów wejścia/wyjścia. 


/ INT (ZX81, ZX Spectrum): wejście słu- 
żące do zgłoszenia przerwania maskowal- 
nego. 


/ NMI (ZX81, ZX Spectrum): wejście słu- 
żące do zgłoszenia przerwania niemasko- 
walnego. 


//BUSRQ (ZX81, ZX Spectrum): wejście. 
Sygnał żądania dostępu do szyny proceso- 
ra. W systemie ZX sygnał ten nie jest 
wykorzystany i jest podłączony do +5 V 
przez rezystor I kQ. 


/ BUSACK (ZX81, ZX Spectrum): wyj- 
ście. Sygnał zezwolenia na dostęp do szyny 
danych. W systemie ZX sygnał ten nie jest 
wykorzystany. 


/ WAIT (ZX81, ZX Spectrum): wejście. 
Sygnał czasowego wstrzymania pracy pro- 
cesora. W ZX81 sygnał ten generowany jest 
pośrednio z ULA. 


/HALT (ZX81, ZX Spectrum): wyjście. 
Sygnał informujący o wykonaniu instruk- 
cji HALT i przejściu do stanu wstrzyma- 
nia. 
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Złącza systemowe mikrokomputerów ZX81 (A> i zx 


/MI (ZX81, ZX Spectrum): wyjście. Sy- 
gnał informujący o wykonywaniu przez 
procesor cyklu pobrania instrukcji (fetch). 
RFSH (ZX81, ZX Spectrum): wyjście. Sy- 
gnał informujący o wykonywaniu cyklu 
odświeżania pamięci dynamicznych. 

©0 (ZX81, ZX Spectrum): wyjście, zegar 
procesora. 

RESET (ZX81, ZX Spectrum): wejście. 
Sygnał wymuszający zerowanie procesora. 
Generowany automatycznie po włączeniu 
zasilania. 


Pozostałe sygnały szyny systemowej sy- 
stemu ZX obsługują pamięć oraz układ 
generacji obrazu: 

/ ROMCS (ZX81. ZX Spectrum): wejście. 
Sygnał wyłączający pamięć systemową 
ROM. 


//RAMCS (ZX81, —): sygnał wyłączający 
wewnętrzny 1 KB pamięci RAM. 

IORQGE (—, ZX Spectrum): wejście 
IORQ układu logicznego ULA; sygnał ten 


„ jest przyłączony do sygnału IORQ proce- 


sora przez szeregowy rezystor. 


U (—, ZX Spectrum): różnicowy sygnał 
chrominancji. 
V (—. ZX Spectrum): różnicowy sygnał 
chrominancji. 
Y (—, ZX Spectrum): zespolony sygnał 
luminancji i synchronizacji. 
Mikrokomputery ZX81 i ZX Spectrum 
wyposażone są w klawiaturę membrano- 
wą, składającą się z 40 pól kontaktowych. 
W odróżnieniu od płaskiej klawiatury 
ZX81, pokrycie klawiatury ZX Spectrum 
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wykonane jest z wytłoczki gumowej, która 
w działaniu sprawia wrażenie normalnej, 
tj. ruchomej klawiatury. Wersja ZX Spec- 
trum + i kolejne wyposażone są w klawia- 
turę, której klawisze wykonane są z pla- 
styku. 

Mikrokomputery ZX współpracują 
z ekranem telewizyjnym. Wbudowany mo- 
dulator UHF UM1223 wytwarza sygnał 
wizyjny w kanale 36, tj. 591.5 MHz, który 
doprowadza się do telewizora poprzez 
gniazdo antenowe. ZX81 wyświetla obraz 
czarno-biały o rozdzielczości 32 na 22 
znaków. ZX Spectrum ma dodatkowo mo- 
żliwość generowania obrazu kolorowego 
w systemie PAL i grafiki o rozdzielczości 
256 na 176 punktów. W ZX81 obraz jest 
generowany przez program zapisany w pa- 
mięci ROM, podczas gdy w ZX Spectrum 
wyświetlaniem zajmuje się całkowicie 
układ ULA. W ZX Spectrum sygnał wizyj- 
ny PAL generowany jest w koderze LM 
1889N. 

Zewnętrzną pamięć masową mikrokom- 
puterów ZX stanowić może dowolny mag- 
netofon kasetowy. Do współpracy z nim 
służą dwa gniazda oznaczone odpowiednio 
MIC i EAR. Nowsze wersje mikrokom- 
putera ZX Spectrum, produkowane już 
przez firmę Amstrad, mają wewnętrznie 
wmontowany magnetofon kasetowy (ZX 
Spectrum + 2) lub 3” napęd dysków ela- 
stycznych (ZX Spectrum + 3). Spotykane 
są również zewnętrzne stacje dysków 
5.25" i 3” (np. spotykana w Polsce stacja 
TIMEX). 

Mikrokomputer ZX może być uzupeł- 
niony drukarką. W zależności od jej typu 
może ona wymagać stosowania specjalizo- 
wanego interfejsu i oprogramowania. 

Na płytce komputera znajduje się rów- 
nież stabilizator napięcia + 5 V. Przetwor- 
nica mikrokomputera ZX Spectrum doda- 
tkowo generuje napięcia +12 V oraz 
—5 V. Mikrokomputery ZX wymagają 
zewnętrznego zasilacza niestabilizowanego 
napięcia stałego +9 V (ZX81 minimum 
700 mA. ZX Spectrum minimum 1,2 A). 

Komputery ZX mają wbudowane inter- 
preter i edytor języka BASIC. Panuje po- 
wszechna opinia, że język ten (sugeruje to 
nawet nazwa, z ang. Beginner's All-purpose 
Symbolic Instruction Code) jest przezna- 
czony dla początkujących. Rzeczywiście, 
opanowanie znaczenia kilkunastu instruk- 
cji prostej wersji języka BASIC nie jest 
zadaniem trudnym, ale ubogi zestaw in- 
strukcji i wprowadzone uproszczenia istot- 
nie ograniczają klasę algorytmów, które 
można swobodnie wyrazić w tym języku. 
Niemniej, praktycznie wszystkie liczące się 
na rynku mikrokomputery osobiste i pro- 
fesjonalne, nie wyłączając IBM i HP, za- 
wierają w swej pamięci stałej edytor i inter- 
preter BASIC. Pierwszy umożliwia pisanie 
programów, drugi — ich wykonywanie. 

Język BASIC nie doczekał się oficjal- 
nego raportu, stąd trudno znaleźć wzorzec, 
w stosunku do którego wersję ZX można 
ocenić. Porównanie dostępnych w niej in- 
strukcji z wersjami BASIC w innych mi- 
krokomputerach wypada dość pomyślnie, 
szczególnie dla ZX Spectrum. BASIC 
ZX81 nie ma jedynie instrukcji DATA, 
READ, RESTORE. 

Systemy ZX doczekały się szerokiej ga- 
my oprogramowania. Oprócz niezliczonej 
ilości, często bardzo złożonych, gier kom- 
puterowych i symulatorów dostępne jest 


28 


także oprogramowanie użytkowe. Nie 

wdając się w szczegóły wymienimy tu: 

b. kompilatory i interpretery języków 
wyższego rzędu (Pascal, FORTH, Mi- 
cro Prolog, Logo, rozszerzone wersje 
BASIC-a), 


b». asemblery i monitory kodu maszyno-. 


wego, 

>- programy graficzne, 

>- programy wspomagania inżynierskiego 
(w tym także udane analizatory ob- 
wodów elektrycznych). 

Oczywiście trzeba sobie zdawać sprawę, 
że ograniczenia struktury systemu nakła- 
dają ograniczenia na poszczególne progra- 
my, które są uboższe niż ich odpowiedniki 
na dużych systemach komputerowych. 

W tym odcinku zamieścimy wiadomości 
wstępne, niezbędne do ogólnego przypom- 
nienia sobie wiadomości o systemach ZX, 
a mianowicie ogólny opis systemu i do- 
kładny opis zmiennych systemowych. 


CHARAKTERYSTYKA SYSTEMU 
KOMPUTERÓW ZX 


W komputerach ZX nie istnieje ścisłe 
pojęcie systemu operacyjnego mikrokom- 
putera. Najczęściej przyjmuje się, że jest to 
zbiór programów nadzorujących korzys- 
tanie z zasobów sprzętowych, do których 
zalicza się mikroprocesor, pamięć operacy- 
jną oraz urządzenia wejścia/wyjścia. Ak- 
ceptacja tej definicji umożliwia zaliczenie 
do systemu operacyjnego nie tylko pro- 
gramów czuwających nad poprawną pracą 
mikrokomputera i pośredniczących w ko- 
munikacji między operatorem i sprzętem 
(monitor), ale też program redagujący (e- 
dytor) i realizujący (interpreter). 

W przypadku mikrokomputerów ZX81 
i ZX Spectrum wymienione programy są 
ze sobą tak ściśle związane, że trudno je 
(z pewnymi wyjątkami) jednoznacznie roz- 
dzielić. System operacyjny mikrokompu- 
terów ZX oraz interpreter języka BASIC 
umieszczono w pamięci stałej mikrokom- 
putera (ROM) o łącznej (wraz z tablicami) 
objętości 8 KB (adresy 0000h...1FFFh) dla 
ZX81 i 16 KB (adresy 0000h...3FFFh) dla 
ZX Spectrum. 

Zawartość całej pamięci ROM w mikro- 
komputerach ZX nazywa się programem 
MONITOR lub ROM PROGRAM. 

Poniżej przedstawiamy najistotniejsze 
procedury MONITORA (w nawiasach po- 
dano odpowiednie adresy procedur dla 
obu mikrokomputerów). 

b- Procedura inicjująca działanie mikro- 
komputera (ZX81 03CBh, ZX Spect- 
rum 11CBh) po doprowadzeniu zasila- 
nia. Ustala ona rozmiar pamięci do- 
stępnej dla interpretera BASIC, warto- 
ści rejestrów I i TY procesora (odpowie- 
dnio ZX81 1Eh i 4000h, ZX Spectrum 
3Fh i 5C3Ah), wybiera tryb SLOW 
(ZX81), instaluje minimalny progra- 
mowy stos maszynowy oraz formuje 
obszar pamięci operacyjnej, gdzie prze- 
chowywana jest informacja o obrazie 
TV (D__FILE). Wszystkie zmienne sy- 
stemowe (omówione dalej) otrzymują 
swoje wartości. 

b. Procedury redagujące języka BASIC 
(ZX81 0419h, ZX Spectrum O0F2Ch) 
umożliwiają pisanie linii programu 
z kontrolą poprawności składni, ich 
poprawianie (ruch kursora, edycja 


wybranej linii) i automatyczny przegląd 
programu. 

>- Procedura interpretująca linię progra- 
mu w języku BASIC (ZX81 OCBAh, 
ZX Spectrum 1B17h), czyli procedura 
nadzorująca realizację linii programu. 

- Zestaw procedur realizujących instruk- 
cje języka BASIC (ZX81 ODABh, ZX 
Spectrum ICEEh). 

>- Procedura realizująca wyrażenia nume- 
ryczne i tekstowe (ZX81 OF5S5h, ZX 
Spectrum 24FBh) wraz z interpretacją 
i obliczaniem wartości funkcji. 

b. Zestaw procedur używanych głównie 
przez program kalkulatora zmienno- 
pozycyjnego (ZX81 158Ah, ZX Spec- 
trum 2D4Fh). 

b- Procedura kalkulatora zmiennopozy- 
cyjnego (ZX81 199Dh, ZX Spectrum 
335Bh). 

,» Procedury współpracy z magnetofo- 
nem (ZX81 02F6h, ZX Spectrum 
04C2h) jako urządzeniem wejścia/wyj- 
ścia. " 

b. Procedury nadzorujące obsługę wy- 
świetlania obrazu (ZX81 0207h, w ZX 
Spectrum obraz jest generowany sprzę- 
towo) wraz z kontrolowaniem stanu 
klawiatury (ZX81 02BBh, ZX Spect- 
rum 02BFh), a więc również współ- 
praca z urządzeniami wejścia/wyjścia. 

b. Zestaw najczęściej używanych proce- 
dur, które mogą być wywoływane |- 
-bajtiowym rozkazem maszynowym 
RST n. 


Podane procedury są uzupełnione licz- 
nymi tablicami, między innymi: 

e znaków (ZX81 007Eh, ZX Spectrum 
0095h), przypisującą jednoznacznie od- 
powiednim kodom znaki lub całe słowa; 

© instrukcji (ZX81 0C29h, ZX Spectrum 
1A48h), umożliwiającą zidentyfikowa- 
nie instrukcji w czasie interpretacji linii 
programu w języku BASIC (instrukcje 

w linii programu reprezentowane są 

przez 1 bajt) i określenie sposobu jej 

wykonania; 

© stałych i funkcji (ZX81 1915h, ZX Spec- 
trum 32C5h) używanych przez procedu- 
rę kalkulatora zmiennopozycyjnego: 

e generatora znaków alfanumerycznych 
(ZX81 1E00h, ZX Spectrum 3D00h), 
określającego kształt poszczególnych 
znaków na ekranie. 

Pamięć RAM, znajdująca się pod kon- 
trolą systemu operacyjnego, podzielona 
jest na kilka obszarów, które przechowują 
różne rodzaje informacji o stanie mikro- 
komputera. Różne systemy operacyjne 
stosują różne sposoby podziału pamięci. 
Podział ten przedstawia się w postaci 
tzw. mapy pamięci. 

Zwykle programista nie musi oriento- 
wać się, gdzie, jak i w jaki sposób przecho- 
wywana jest informacja. Jednakże znajo- 
mość systemu operacyjnego umożliwia 
świadomą ingerencję w jego działanie. Nie- 
kiedy taka ingerencja prowadzi do efek- 
tywniejszego wykonywania programów. 
Ponadto część procedur może być z powo- 
dzeniem używanych przez programistów 
realizujących swe własne programy w ko- 
dzie maszynowym. Omówimy niektóre 
z nich. Czytelników nie znających zasad 
programowania w kodzie maszynowym 
i związanych z tym nierozerwalnie mnemo- 
nicznych skrótów rozkazów mikroproce- 
sora Z80 odsyłamy do bogatej literatury, 
również w języku polskim. Zasady pisania 


programów maszynowych dla mikrokom- 
puterów ZX przedstawione zostaną w ko- 
lejnych częściach cyklu. 


ZMIENNE SYSTEMOWE 
MIKROKOMPUTERA ZX81 


System operacyjny wymaga pewnego 
obszaru pamięci, gdzie byłyby przechowy- 
wane charakterystyczne parametry umo- 
żliwiające kontrolowanie poprawnej pracy 
całego mikrokomputera, tak też jest 
w przypadku mikrokomputerów ZX81 
i ZX Spectrum. Obszar ten nazwano 
obszarem zmiennych systemowych 
(SYS__VAR). Zawarte w nich informacje 
umożliwiają ocenę stanu mikrokomputera 
i zmienianie go z wnętrza procedur realizo- 
wanych w kodzie maszynowym, jak ró- 
wnież z poziomu języka BASIC. Poniżej 
zestawiono zmienne systemowe (w nawia- 
sach kolejno podano: liczbę bajtów, adresy 
w kodzie szesnastkowym i dziesiętnym). 


ERR__NR (1, 4000h, 16384). Kod raportu 
o błędzie zmniejszony o 1. Umieszczenie 
w tej zmiennej wartości mniejszej niż 128 
powoduje zatrzymanie pracy wykonywa- 
nego programu (por. tabl. 1) i zgłoszenie: 


>- standardowego komunikatu o błędzie 
(0...14), 

>- niestandardowego komunikatu o błę- 
dzie (15...35 i 98...127) oraz podanie 
numeru linii, w trakcie realizacji której 
system wykrył wystąpienie wskazanej 
wartości zmiennej ERR__NR, lub: 

>- niezgłoszenie komunikatu i/lub dezor- 
ganizację (tzw. zawieszenie) pracy sys- 
temu (36...97). 


FLAGS (1, 4001h, 16385). Zespół bitów 
kontrolnych systemu. - 


Bit 0 — wskaźnik druku dodatkowej 
spacji: 


1 — spację zignorować, 

0 — umieścić dodatkową spację 
poprzedzającą lub kończącą 
druk nazwy instrukcji (słowa). 

Bit | — wskaźnik kontrolny drukarki: 


| — wyprowadzenie znaku na dru- 
karkę, 


0 — wyprowadzenie znaku na 
ekran. 
Bit 2 — wskaźnik wyboru trybu pracy 
klawiatury: 


| — tryb inny niż K (z ang. keyword), 
0 — tryb K. 

Bit 6 — wskaźnik typu zmiennej umiesz- 
czonej ostatnio na'szczycie stosu 
kalkulatora: 

— liczba, 

— parametry łańcucha. 

— wskaźnik rodzaju pracy: 

— interpretacja linii programu 
w języku BASIC, 
(0 — sprawdzenie 

składni linii. 

ERR__SP (2, 4002h, 16386). Adres pierw- 

szej pozycji (dna) stosu maszynowego; ró- 

wnocześnie wskaźnik stosu GOSUB prze- 
chowującego powrotne numery linii z pod- 
programów, jeżeli: 

errsp = PEEK 16386 + 256x*PEEK 16387, 

to wartość: 

PEEK (errsp + 2) + 25644 PEEK (errsp + 3) 

wskazuje numer wiersza (15872 oznacza 

pusty stos GOSUB), do którego nastąpi 
skok przy wykonaniu instrukcji RETURN 


Bit 


JO 


poprawności 


(jest to zwiększony o 1 numer wiersza, 
w którym wystąpiła instrukcja GOSUB). 
RAMTOP (2, 4004h, 16388). Adres pier- 
wszej komórki pamięci powyżej obszaru 
kontrolowanego przez interpreter języka 
BASIC. Zmniejszenie tej wartości i prze- 
niesienie stosu maszynowego i stosu 
GOSUB (np. przez NEW) umożliwia 
umieszczenie powyżej adresu wyznaczone- 
go przez RAMTOP programu w kodzie 
maszynowym lub danych. 
MODE (1, 4006h, 16390). Wskaźnik wy- 
boru trybu pracy klawiatury: 

0 — tryb L (z ang. letter), 

1 — tryb F (z ang. function), 

4 — tryb G (z ang. graphics). 
PCC (2, 4007h, 16391). Numer interp- 
retowanej linii, zmienna ta zostaje podana 
przy raporcie o błędzie (po znaku ,,/”'). 
VERSN (1, 4009h, 16393). Oznaczenie 
początku bloku pamięci RAM, od którego 
są pobierane zmienne przez instrukcję 
SAVE (zapis na magnetofon). 
E__PPC (2, 400Ah, 16394). Numer linii 
programu z kursorem (linia o tym numerze 
ukaże się w dolnej części ekranu po naciś- 
nięciu EDIT). 
D__FILE (2, 400Ch, 16396). Adres pierw- 
szej komórki obszaru pamięci używanego 
do zapamiętania obrazu TV (zwanego ob- 
szarem D__FILE). Obszar ten znajduje się 
zawsze bezpośrednio za programem w ję- 
zyku Basic. Stąd wartość wyrażenia 
PEEK 16396 +256%xPEEK 16397 — 16509 
określa rozmiar programu w bajtach. 
DF__CC (2, 400Eh, 16398). Adres w ob- 
szarze D__FILE, pod którym będzie umie- 
szczony kolejny znak przeznaczony do 
wydruku. 
VARS (2, 4010h, 16400). Adres pierwszej 
komórki obszaru pamięci przechowujące- 
go zadeklarowane zmienne (zwany obsza- 
rem VARS), niech: 
vars = PEEK 16400 + 2564PEEK 16401. 
DEST (2, 4012h, 16402). Adres pierwszej 
litery nazwy poszukiwanej zmiennej w linii 
programu, gdy jest to zmienna prosta użyta 
pierwszy raz, lub w obszarze VARS, gdy 
występowała wcześniej lub jest to zmienna 
indeksowana. 
E__LINE (2, 4014h, 16404). Adres obszaru 
roboczego edytora. gdzie jest umieszczana 
redagowana linia programu (lub zlecenie 
bezpośrednie), bądź kopia linii programu 
po EDIT. Równocześnie zmienna ta okre- 
śla koniec obszaru zmiennych, jeżeli 
eline = PEEK 16404 + 256*PEEK 16405, 
to 
eline — vars 
określa wielkość obszaru zmiennych, a 
eline — 16393 
rozmiar pamięci, jaki zostanie zapamięta- 
ny na taśmie magnetofonowej przez in- 
strukcję SAVE, gdyż ostatnim zapisywa- 
nym bajtem jest bajt o adresie eline — I 
CH__ADD £2, 4016h, 16406). Adres znaku 
(kodu instrukcji), który będzie interpreto- 
wany w linii programu lub w zleceniu 
bezpośrednim. 
X__PTR (2, 4018h, 16408). Adres znaku 
w linii programu lub w zleceniu bezpośred- 
nim (w obszarze roboczym interpretera), 
który jest poprzedzony kursorem infor- 
mującym o błędzie składni w linii. 
STKBOT (2, 401Ah, 16410), Adres począ- 
tku stosu kalkulatora zmiennopozycyjne- 


go. 
STKEND (2, 401Ch, 16412). Adres końca 
stosu kalkulatora zmiennopozycyjnego. 


BREG (1, 401Eh, 16414). Rejestr roboczy 
B używany głównie przez kalkulator 
zmiennopozycyjny 

MEM (2, 401Fh. 16415). Adres obszaru 
roboczego procedury kalkulatora. 
DF__SZ (1, 4022h, 16418). Liczba linii 
w dolnej części ekranu (standardowo 2) 
zarezerwowanych dla systemu. Zmniejsze- 
nie tej liczby umożliwia umieszczenie tam 
własnych wydruków (przed wykonaniem 
instrukcjj SCROLL liczba ta musi być 
większa niż 0, przed INPUT większa niż 1). 
S__TOP (2, 4023h, 16419). Numer linii, od 
której będzie emitowany tekst programu 
na ekranie TV. 

LAST__K (2, 4025h, 16421). Odczyt stanu 
klawiatury. 

DEBOUNCE (1, 4027h, 16423). Zmienna 
informująca czy nastąpiła zmiana w wybo- 
rze klawisza. 

MARGIN (1, 4028h, 16424). Stała zależna 
od systemu TV. 

NXTLN (2, 4029h, 16425). Adres początku 
kolejnej linii programu, która będzie inter- 
pretowana. Zmienna ta umożliwia umiesz- 
czenie procedur w kodzie maszynowym 
w liniach REM w dowolnym miejscu pro- 
gramu w języku BASIC, jeżeli są to proce- 
dury przemieszczalne (relokowalne), czyli 
niezależne od adresu, pod którym się znaj- 
dują, np.: 


9997 RAND USR (5+PEEK 16425+ 
+ 256%xPEEK 16426) 

9998 REM procedura w kodzie maszy- 
nowym 

9999 RETURN 


OLDPPC (2, 402Bh, 16427). Numer linii, 
do której nastąpi skok po wykonaniu in- 
strukcji CONT. 

FLAGX (1, 402Dh, 16429). Bity kontrolne 
systemu. 


Bit 0 — wskaźnik typu zmiennej: 
1 — zmienna prosta, 
0 — zmienna indeksowana. 
Bit | — wskaźnik obecności zmiennej 
w obszarze VARS: 
1 — zmienna nie występowała, 
0 — zmienna znajduje się w obsza- 
rze VARS. 


Bit 5 — wskaźnik trybu pracy: 
| — tryb INPUT, 
0 — tryb EDIT. 


Bit 6 — wskaźnik oczekiwania w trybie 
INPUT na: 
1 — wyrażenie arytmetyczne, 
0 — wyrażenie tekstowe. 


STRLEN (2, 402Eh, 16430). Długość 
zidentyfikowanej zmiennej alfanumery- 
cznej lub linii programu. 

T_ ADDR (2, 4030h, 16432). Adres na- 
stępnego elementu w tablicy parametrów 
(określającej składnię realizowanej instru- 
kcji), który będzie pobrany do interpre- 
tacji. 

SEED (2, 4032h, 16434). Podstawa genera- 
tora liczb pseudolosowych. Wartość ar- 
gumentu instrukcji RAND (dla 0 jest to 
liczba losowa) lub wartość ostatnio użytej 
funkcji RND pomnożona przez 65536. 
FRAMES (2, 4034h, 16436). Licznik ob- 
razów TV. Zawartość tej zmiennej jest 
zmniejszana co 0,02 s, tak, by bit 15 równał 
się 1. Zmienna ta jest stosowana przez 
instrukcję PAUSE, która umieszcza tu 
swój argument (bit 15=0). Zmienna 
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FRAMES umożliwia pomiar czasu (w try- 
bie SLOW) do ponad 10 minut. Np. przed 
pomiarem 

POKE 16437,255 

POKE 16436,255 
a na zakończenie pomiaru 

time = 65535— PEEK 16436 — 

256%PEEK 16437 

wartość time/50 będzie odpowiadać cza- 
sowi pomiaru w sekundach. 
COORDS (2, 4036h, 16438). Zmienna 
przechowuje argumenty ostatnio użytej in- 
strukcji PLOT lub UNPLOT. 
PR__CC(I, 4038h, 16440). Mniej znaczą- 
ca część adresu, pod którym zostanie umie- 
szczony kod znaku przeznaczonego do 
wydrukowania na drukarce. 
S__POSN (2, 4039h, 16441). Współrzędne 
następnego wydruku na ekranie TV: 

24— PEEK 16442 
podaje numer wiersza, 

33—PEEK 16441 
podaje numer kolumny. 
CDFLAG (1, 403Bh, 16443). Bity kontrol- 
ne systemu. 
Bit 0 — wskaźnik stanu klawiatury: 


| — klawisz został wciśnięty, 
0 — klawisz nie został wciśnięty. 
Bit 6 — zasadniczy wskaźnik trybu 
SLOW/FAST: 
— tryb SLOW, 


l 

0 — tryb FAST. 

7 — pomocniczy wskaźnik trybu 
SLOW/FAST, wymuszający 
tryb SLOW przy obowiązują- 
cym trybie FAST (np. przy 
INPUT): 

1 — tryb SLOW, 

0 — tryb zgodny ze stanem okre- 
ślonym przez bit 6. 

PRBUFF (33, 403Ch, 16444). Bufor dru- 

karki. 

MEMBOT (30, 405Dh, 16477). Obszar 

pamięci roboczej kalkulatora zmiennopo- 

zycyjnego. Może przechowywać sześć liczb 

w postaci zmiennopozycyjnej. 


Bit 


ZMIENNE SYSTEMOWE 
MIKROKOMPUTERA ZX SPECTRUM 


KSTATE (8, 5C00h, 23552). Zdu- 
blowany system (zestaw _ pierwszy 
KSTATE_0...KSTATE_3 i - drugi 
KSTATE_ _4...KSTATE__7) zmiennych 
określających stan klawiatury. W zmien- 
nej KSTATE_ 4 znajduje się kod główny 
wciśniętego klawisza (FFh, gdy klawia- 
tura nie jest używana albo wciśnięty 
jest tylko CAPS_SHIFT lub tylko 
SYMBOL_ SHIFT). W KSTATE_ 7 
znajduje się właściwy kod ASCII (po 
uwzględnieniu równoczesnego wciśnięcia 
CAPS_ SHIFT lub SYMBOL_ SHIFT) 
ostatnio wybranego klawisza. KSTA- 
TE__5 (powtarzanie) i KSTATE__6 (opó- 
źnienie) służą określaniu relacji czasowych 
przy automatycznym powtarzaniu odczy- 
tu. Jeżeli dwa różne klawisze zostaną kolej- 
no wciśnięte w odstępie krótszym niż okres 
automatycznego powtarzania (z ang. auto- 
repeat, standardowo 0,1 s), to analogiczne 
dane o drugim klawiszu są  umie- 
szczane w zestawie pierwszym (KSTA- 
TE__0...KSTATE__3). 

LAST__K (1, 5C08h, 23560). Właściwy 
kod ASCII ostatnio wybranego klawisza. 


30 


REPDEL (1, 5C09h, 23561). Opóźnienie, 
czas (wielokrotność 1/50 s), jaki musi upły- 
nąć przed rozpoczęciem realizacji automa- 
tycznego powtarzania odczytu klawisza 
(standardowo 23h, czyli'0,7 s). 

REPPER (1, 5SCOAh, 23562). Powtarzanie, 
czas (wielokrotność 1/50 s) między kolej- 
nymi automatycznymi odczytami klawisza 
(standardowo 05h, czyli 0,1 s). 

DEFADD (2, 5COBh, 23563). Adres ar- 
gumentu występującego w deklaracji DEF 
FN). 


K__DATA (1, 5CODh, 23565). Informacja 
o interpretacjj kodu FLASH, BRIGHT 
lub INVERSE: i 

| — włączyć (ON), 

0 — wyłączyć (OFF). 
TVDATA (2, 5CO0Eh, 23566). Przecho- 
wuje kod użytego znaku kontrolnego 
INK...OVER (w TVDATA__lo, czyli 
w mniej znaczącym bajcie) i jego argument 
(w TVDATA__hi, czyli w bardziej znaczą- 
cym bajcie). Dla znaków kontrolnych AT 
i TABw TVDATA__lo jest przechowywa- 
ny jego kod, a w TVDATA__hi pierwszy 
argument (drugi jest zapamiętywany chwi- 
lowo w rejestrze A procesora). 
STRMS (38, 5C10h, 23568). Adresy wzglę- 
dne (z ang. offsets) kanałów ustalają- 
cych komunikację procesora z urządzenia- 
mi wejścia/wyjścia. 
CHARS (2, 5C36h, 23606). Adres począt- 
ku generatora znaków zmniejszony 
o 0100h. Zawiera kolejno wzorce znaków 
o kodach 20h...7Fh. Można ustalić własny 
generator tych znaków w pamięci RAM 
(umieszczając analogicznie przekształcony 
adres jego początku w CHARS). 
RASP (1, 5C38h, 23608). Czas (wielokro- 
tność 1/50 s) trwania sygnału ostrzega- 
wczego (standardowo 40h, czyli 1,28 s). 
PIP (1. 5C39h, 23609). Czas (wielokro- 
tność 1/50 s) trwania sygnału po naci- 
śnięciu klawisza (standardowo 00h). 
ERR__NR (1, 5C3Ah, 23610). Kod rapor- 
tu o błędzie zmniejszony o 1. Umieszczenie 
w tej zmiennej dowolnej wartości i wywoła- 
nie 

USR 88 
spowoduje zatrzymanie pracy wykonywa- 
nego programu i zgłoszenie 
— standardowego komunikatu o błędzie 

(0...28) lub zakończenie pracy (255), 
— niestandardowego komunikatu o błę- 
dzie (29...254). 

Oprócz symbolu, numeru wiersza i pozycji 
w wierszu ukazuje się również słowny ko- 
mentarz. 
FLAGS (1, 5C3Bh, 23611). Zespół bitów 
kontrolnych systemu: 


Bit 0 — wskaźnik druku dodatkowego 
odstępu (spacji): 
| — spację pominąć, 
0 — umieścić dodatkową spację po- 
przedzającą lub kończącą druk 
nazwy instrukcji (słowa). 


Bit | — wskaźnik kontrolny drukarki: 
| — wyprowadzenie znaku na dru- 
karkę, 
0 — wyprowdzenie znaku na ekran. 
Bit 2 — wskaźnik trybu, w którym bę- 


dzie drukowany kolejny znak: 
| — w trybie L (z ang. letter) lub C 
(z ang. capital), 
0 — w trybie K (z ang. keyword). 
Bit 3 — wskaźnik wyboru modu klawia- 
tury: 
— tryb L lub C, 
tryb K. 


c — 
| 


Bit 4 — wskaźnik wyboru kanału wej- 
ścia/wyjścia: 

— kanał K (z ang. keyboard), 

— kanał inny niż K. 

— wskaźnik stanu klawiatury: 

wciśnięty nowy klawisz, 

— klawiatura nie używana, gotowa 

do odczytu. 

— wskaźnik typu zmiennej umiesz- 
czonej ostatnio na szczycie stosu 
kalkulatora: 

— liczba, 

— parametry łańcucha. 

wskaźnik rodzaju pracy: 

— interpretacja linii programu, 
— sprawdzanie poprawności skła- 
dni linii. 

TV__FLAG (1, 5C3Ch, 23612). Zespół 

bitów kontrolnych systemu: 

Bit 0 — wskaźnik wyboru obszaru ekra- 


Bit 


a OoO=—nOv< 
| 


Bit 


Bit 


DvQ=JO— 
| 


nu: 

1 — wybór dolnej (systemowej) czę- 
ści, 

0 — wybór górnej (głównej) części. 

3 — wskaźnik zmiany trybu 
EDIT/INPUT: 

| — nastąpiła zmiana, 

0 — bez zmian. 

4 — wskaźnik automatycznego wy- 
świetlania tekstu programu (z 
ang. listing): 

| — wyświetlać, 

0 — nie wyświetlać. 

Bit 5 — wskaźnik stanu systemowej czę- 


ści ekranu: 
| — oczyścić po naciśnięciu klawisza, 
0 — pozostawić bez zmian. 


ERR__SP (2, 5C3Dh, 23613). Adres pier- 
wszej pozycji (dna) stosu maszynowego, 
równocześnie wskaźnik stosu GOSUB 
(por. ze zmienną systemową ZX81 o tej 
samej nazwie). 

LIST_ SP (2. 5C3Fh, 23615). Adres (w 
stosie maszynowym), pod którym znajduje 
się adres powrotu z procedury realizującej 
automatyczne wyświetlanie tekstu progra- 
mu. 


MODE (1, 5C41h, 23617). Wskaźnik wy- 
boru trybu pracy klawiatury: 

0 — tryb K (z ang. keyword), L (z 
ang. lower) lub C (z ang. capi- 
tal), 

| — tryb E (z ang. extend), 

2 — tryb G (z ang. graphics). 
NEWPPC (2, 5C42h, 23618). Numer na- 
stępnej linii do interpretacji. 

NSPPC (1, 5C44h, 23620). Numer instruk- 
cji w linii, która będzie interpretowana. 
PPC (2, 5C45h, 23621). Tak jak dla ZX81. 


SUBPPC (1, 5C47h, 23623). Numer in- 
strukcji w linii, która jest interpretowana. 


BORDCR (1, 5C48h, 23624). Kod koloru 
ramki (BORDER) i systemowej części 
obrazu TV (PAPER) pomnożony przez 8, 
plus kod koloru znaków (INK) dla tej 
części ekranu. 

E__PPC (2, 5C49h, 23625). Tak jak dla 
ZX81. 

VARS (2, 5C4Bh, 23627). Adres pierwszej 
komórki obszaru pamięci przechowujące- 
go zadeklarowane zmienne (zwanego ob- 
szarem VARS), niech 

vars = PEEK 23627 + 256*4PEEK 23628 


DEST (2, 5C4Dh, 23629). Tak jak dla 
ZX81. 
CHANS (2, 5C4Fh. 23631). Podstawa 


adresu, pod którym znajdują się informa- 
cje o kanałach ustalających komunikację 
procesora z urządzeniami wejścia/wyjścia. 
CURCHL (2, 5C51lh, 23633). Adres, pod 
którym znajduje się informacja o obowią- 
zującym (wybranym) kanale. 

PROG (2. 5C53h, 23635). Adres, od któ- 
rego jest pamięci tekst 
oai SPORZE PK, BRSIC (obszar 
PROG), jeżeli 

prog = PEKŁKV28RX5 + 256xPEEK 23636 
to 

vars— prog 

określa rozmiar programu w bajtach. 


NXTLIN 23637). Adres począt- 
ku kolejno pb (ramu. 

DATADD (2, 5C57h, 23639). Adres (w 
obszarze PROG) wskazjący separator koń- 
czący ostatnio wczytany element z instruk- 
cji DATA. 

E__LINE (2, 5C59h, 23641). Tak jak dla 
ZX81. 


K_ CUR (2, 5C5Bh, 23643). Adres kur- 
sora. 

CH__ADD'€£, 5C5Dh, 23645). Tak jak dla 
ZX81. 

X__PTR (2, 5C5Fh, 23647). Tak jak dla 
ZX81. 


WORKSP (2, 5C6lh, 23649). Adres ob- 
szaru roboczego interpretera. Są tam chwi- 
lowo umieszczane dane przy instrukcji 
BASIC INPUT. 


STKBOT (2, 5C63h, 23651). Tak jak dla 
ZX81. 


STKEND (2, 5C65h, 23653). Tak jak dla 
ZX81. 


BREG (1, 5C67h, 23655). Tak jak BERG 
dla ZX81. 


MEM (2, 5C68h, 23656). Tak jak dla 
ZX81. 


FLAGS2 (1, 5SC6Ah, 23658). Zespół bitów 
kontrolnych systemu. 


Bit 0 — wskaźnik stanu ekranu: 


| — obszar ekranu nie jest pusty, 
0 — obszar ekranu jest pusty. 
Bit | — wskaźnik stanu bufora drukarki: 


1 — bufor drukarki nie jest pusty, 
0 — bufor drukarki jest pusty. 
Bit 2 — wskaźnik cudzysłowu: 
l — analizowany znak jest elemen- 
tem łańcucha, 
0 — analizowany znak nie jest ele- 
mentem łańcucha. 
Bit 3 — wskaźnik CAPS__ LOCK: 
l — drukować w trybie C (z ang. 
capital), 
0 — drukować w trybie L (z ang. 
lower). 
Bit 4 — wskaźnik obowiązującego kana- 
łu wejścia/wyjścia. 
| — kanał K (z ang. keyboard), 
0 — kanał inny niż K. 
DF__SZ (1, 5C6Bh, 23659). Tak jak dla 
ZX81. 
S__TOP (2, 5C6Ch, 23660). Tak jak dla 
ZX81. 
OLDPPC (2, 5SC6Eh, 23662). Numer linii, 
do której nastąpi skok po wykonaniu in- 
strukcji CONTINUE. 3 


OSPPC (1, 5C70h, 23664). Numer instruk- 
cji w linii, która będzie interpretowana przy 
zleceniu CONTINUE. 


FLAGX (1, 5C71h, 23665). Zespół bitów 
kontrolnych systemu. 


Bit 0 — wskaźnik wyrażenia tekstowego: 
1 — prosty tekst, 
0 — tablica tekstowa lub złożone wy- 
rażenie tekstowe. 
Bit | — wskaźnik obecności zmiennej 


1 — zmienna nie występowała, 
0 — zmienna znajduje się w obsza- 
5 


Bit 5 — wskaźnik trybu pracy: 
I — tryb INPUT, 
0 — tryb EDIT. 

Bit 6 — wskaźnik oczekiwania w trybie 
1 — wyrażenie arytmetyczne, 


0 — wyrażenie tekstowe. 

Bit 7 —, wskaźnik rodzaju trybu INPUT: 
I — INPUT LINE, 
0 — INPUT. 


STRLEN (2, 5C72h, 23666). Tak jak dla 
ZX81. 

T__ADDR (2, 5C74h, 23668). Tak jak dla 
ZX81. 

SEED (2, 5C76h, 23670). Podstawa gene- 
ratora liczb pseudolosowych. Wartość ar- 
gumentu instrukcjj RANDOMIZE (dla 
0 jest to zawartość dwóch mniej znaczą- 
cych bajtów zmiennej FRAMES) lub war- 
tość ostatnio użytej funkcji RND pomno- 
żona przez 65536. 


FRAMES (3, 5C78h, 23672). Licznik ob- 
razów TV. Wartość 
time = PEEK 23672 + 256% 
4% PEEK 23673 +65536%*PEEK 23674 
jest zwiększana o jeden co 0,02 s. 


UDG (2, 5C7Bh, 23675). Adres początku 
obszaru, gdzie znajduje się generator 21 
zdefiniowanych znaków graficznych. Moż- 
na zdefiniować kilka generatorów i zmie- 
niając wartość zmiennej UDG stosować 
kilka zestawów znaków graficznych. 
COORDS (2, 5C7Dh, 23677). Współ- 
rzędne ostatnio kreślonego punktu, x= 
=COORDS__lo, y=COORDS__hi. 
P_POSN (1, 5C7Fh, 23679). Pozycja 
(33—P__POSN) ostatnio wprowadzonego 
znaku w buforze drukarki. 

PR__CC (1, 5C80h, 23680). Tak jak dla 
ZX81. 

ECHO__E (2, 5C82h, 23682). Kolumna 
(33—ECHO__E_ lo) i wiersz 
(24—ECHO__E__hi) poprzedniej pozycji 
wydruku w systemowej części ekranu TV. 
DF__CC (2, 5C84h, 23684). Tak jak dla 
ZX81. 

DFCCL (2, 5C86h, 23686). Adres w ob- 
szarze D__FILE (część systemowa), pod 
którym zostanie umieszczony kolejny 
znak. 

S__POSN (2, 5C88h, 23688). Tak jak dla 
ZX81. 

SPOSNL (2, 5C8Ah, 23690). Kolumna 
(33—SPOSNL__lo) i wiersz 
(24—SPOSNL__hi) pozycji wydruku 
w systemowej części ekranu TV, gdzie 
zostanie umieszczony kolejny znak. 
SCR__CT (1, 5C8Ch, 23692). Licznik wy- 
konanych przesunięć obrazu o jeden wiersz 
w górę (tzw. scroll). Po każdorazowym 
przesunięciu zawartość SCR__ CT jest 
zmniejszana o 1. Jeżeli przed zmianą wier- 
sza SCR_CT=l1, to system zatrzymuje 


wykonywanie programu z zapytaniem 

„scroll, po odpowiedzi pozytywnej 

SCR__CT otrzymuje wartość nie większą 

niż 18h. 

ATTR__P (I, 5C8Dh, 23693). Stałe (obo- 

wiązujące dla całego ekranu) informacje 

o kolorach. 

Bit 0...bit 2 — kod INK (0...7), (111)b 

oznacza też INK 8 lub INK 9. 

Bit 3...bit 5 — kod PAPER (0...7), (111)b 

oznacza też PAPER 8 lub PAPER 9. 

Bit 6 — kod BRIGHT (0,1). 

Bit 7 — kod FLASH (0,1). 

MASK__P (1, 5SC8Eh, 23694). Stałe (obo- 

wiązujące dla całego ekranu) informacje 

o efektach specjalnych dotyczących kolo- 

rów. 

Bit 0...bit 2 — (111)b oznacza INK 8 lub 

INK 9, (000)b oznacza INK (0...7). 

Bit 3...bit 5 — (111)b oznacza PAPER 8 

lub PAPER 9, (000)b oznacza PAPER 

(0...7). 

Bit 6 — I oznacza BRIGHT 8, 

0 oznacza nie BRIGHT 8. 

Bit 7 — | oznacza FLASH 8, 

0 oznacza nie FLASH 8. 
ATTR__T (1, 5C8Fh, 23695). Chwilowe 
(obowiązujące dla danego wydruku) infor- 
macje o kolorach. Dekodowanie takie, jak 
w ATTR__P. 

MASK_ T (1, 5C90h, 23696). Chwilowe 

(obowiązujące dla danego wydruku) in- 

formacje o efektach specjalnych dotyczą- 

cych kolorów. Dekodowanie takie, jak 

w MASK__P. 

P__FLAG (1, 5C91h, 23697). Wskaźniki 

kontrolne systemu. 

Bit 0 i bit I — kod OVER. 

Bit 2 i bit 3 — kod INVERSE. 

Bit 4 i bit 5 — I oznacza INK 9, 

0 oznacza nie INK 9. 

Bit 6 i bit 7 — I oznacza PAPER 9, 

0 oznacza nie PAPER 9, 
przy czym bity parzyste są wartościami 
chwilowymi, a nieparzyste — stałymi. 
MEMBOT (30, 5C92h, 23698). Tak jak dla 
ZX81. 

RAMTOP (2, 5CB2h, 23730). Tak jak dla 

ZX81. 

P__RAMT (2, 5CB4h, 23732). Najwyższy 

(ostatni) adres dostępnej komórki w pa- 

mięci RAM (7FFFh dla ZX Spectrum 16K 

lub FFFFh dla ZX Spectrum 48K i ZX 

Spectrum +). 

Dla tych, którzy chcieliby poszerzyć 
swoje wiadomości o systemach ZX przed 
następnymi odcinkami, podajemy spis wy- 
branej literatury dotyczącej tematu. 
> Logan I., O'Hara F. „The Complete 

Spectrum ROM  Disassembly”, Mel- 
bourne House (Publishers) Ltd., 
Leighton Buzzard 1983. 

>. Logan I., O'Hara F. „The Complete 
Timex TS1000 ś Sinclair ZX81 ROM 
Disassembly”, Melbourne House (Pu- 
blishers) Ltd., Leighton Buzzard 1982. 

>- Vickers S. „Sinclair Z.X Spectrum BA- 
SIC programming”, Sinclair Research 
Ltd., Cambridge 1983. 

b Vickers S. .„ZX81 BASIC  Pro- 
gramming”, Sinclair Research Ltd., 
Cambridge 1981. 

b». Kadlof A. Broszura z serii ABC „„Kom- 
putera” dotycząca ZX Spectrum. 

>- Kuryłowicz K., Madej D., Marasek K. 
„Przewodnik po ZX SPECTRUM”, 
WKiŁ, Warszawa 1986. 

Zachęcamy do zapoznania się z wybra- 
nymi pozycjami! 


31 


W tym artykule będzie mowa o przyszłości. 
Jest nią technologia arsenku galu, umożliwiająca 
stosowanie niskich wartości prądów progowych 
na złączach i uzyskanie dużej szybkości pracy 
układów. W 1983 roku wykonano w tej techno- 
logii eksperymentalną pamięć statyczną o pojem- 
ności | KB. Dwa lata później budowano już 
pamięci statyczne o pojemności 16 KB i układy 
zawierające do dwóch tysięcy bramek logicznych. 

Rok 1986 zaowocował 4-bitowym mikropro- 
cesorem wytworzonym przez firmę Mc Donnell 

* Douglas. MD2901 wykonano w technologii 
JFET (ang. Junction Field Effect Transistors), 
w której bramki logiczne są wytwarzane przez 
bombardowanie płytki z GaAs strumieniem jo- 
nów. Szerokość bramek w mikroprocesorze wy- 
nosi | mikrometr, moc wydzielana w pojedynczej 
bramce nie przekracza 200 mikrowatów. Układ 
mieści się na polu o wymiarach 3,3 x 3,3 milime- 
tra, na którym upakowano 1860 tranzystorów. 
Pobór mocy wynosi 135 miliwatów. 

MD2901 jest funkcjonalnym odpowiednikiem 
stosowanego w wielu sterownikach Am2901 
— ale znacznie szybszym. W ciągu sekundy 
wykonuje 25 milionów instrukcji maszynowych, 
co oznacza moc 25 MIPS. W czasie prób gotowe- 
go urządzenia stwierdzono, iż jego wydajność jest 
nieco niższa, niż zakładano. Winne były tworzące 
się na połączeniach pojemności pasożytnicze, 
które zwiększały czas przebiegu sygnału. Ich 
powstawanie zostało uwzględnione przy projek- 
towaniu następnego mikroprocesora. 

Jest nim — na jesieni *87 jeszcze nie wykonany 
w całości — MD 484. Zaprojektowano go jako 
32-bitowy mikroprocesor RISC o wydajności 
około 100 MIPS. Architekturę MD 484 wzoro- 
wano na istniejącym już mikroprocesorze MIPS 
(nie mylić ze skrótem jednostki!) wykonanym 
w Stanford. Umożliwiono pobranie danej lub 
instrukcji w ciągu $ nanosekund i współpracę 
z maksymalnie ośmioma koprocesorami aryt- 
metycznymi. 


Mikroprocesor ma posiadać trzy magistrale: 
instrukcji, danych i adresową. Stosowanie tej 
samej magistrali do generowania adresów da- 
nych i rozkazów nie stworzy wąskiego gardła dla 
obliczeń. Będzie ona wykorzystywana tylko przy 
pobieraniu danych, wykonywaniu instrukcji sko- 
ku i wydawaniu komend koprocesorom. W kom- 
puterach wykorzystujących MD 484 pamięć in- 
strukcji zostanie wyposażona we własny licznik 
rozkazów i układy zajmujące się automatycznym 
dostarczaniem rozkazów jednostce centralnej. 
Wykonanie skoku będzie wymagało jedynie po- 
dania przez mikroprocesor adresu, który zo- 
stanie wpisany do zewnętrznego licznika roz- 
kazów. 

Mikroprocesor ma zawierać 17 rejestrów 
32-bitowych ogólnego przeznaczenia. Podczas 
jego projektowania przewidziano miejsce dla 
ośmiu dalszych rejestrów, które mogą być doda- 
ne w miarę rozwoju technologii GaAs. CPU 
będzie też wyposażony w 24-bitowy licznik roz- 
kazów, rejestr statusu i kilka rejestrów ze znacz- 
nikami. Kod operacji zajmuje sześć najbardziej 
znaczących bitów 32-bitowego słowa, pozostałe 
przeznaczono na operandy. Analizy wykazały, że 
w programie 91% instrukcji będzie wykonywa- 
nych w pojedynczym cyklu zegarowym. Reszta 
zostanie automatycznie przetłumaczona na ciąg 
instrukcji prostych. 

Mikroprocesor będzie zawierał 23 176 tranzys- 
torów i 10 384 rezystory umieszczone na powierz- 
chni 6,5 x 11 mm. Przewidywana moc pobierana 
przez układ wyniesie 4—6 watów. Podczas proje- 
ktowania CPU stosowano zasadę czasowej Ście- 
żki krytycznej. Podsystemy mogące wydłużyć 
czas cyklu zegarowego konstruowano tak, by 
zmniejszyć opóźnienia sygnału — bez troski 
o liczbę tranzystorów czy pobór mocy. W pozos- 
tałych ilość elementów i spodziewane straty mocy 
optymalizowano. 

Mc Donnell Douglas buduje prototyp mikro- 
procesora w trzech etapach. Pierwszy stanowił 
układ Demo I zawierający około 5000 tranzys- 
torów — Jednostkę Arytmetyczno-Logiczną. 
Następnie wytworzono i przetestowano Demo II 
złożony z ponad 17 tysięcy tranzystorów. Pozos- 
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tał już tylko krok do otrzymania kompletnego 
mikroprocesora. 

Koprocesory arytmetyczne współpracujące 
z MD 484 zostaną również wytworzone z arsenku 
galu, będą zawierały ponad 26 tysięcy tranzys- 
torów. Będą operować na danych pojedynczej 
(32 bity) i podwójnej (64 bity) precyzji zapisanych 
w formacie IEEE. Wyniki operacji będą zapamię- 
tywane z większą dokładnością, niż dane wejś- 
ciowe — dla zmniejszenia błędów zaokrągleń. 
Będzie możliwe zaprogramowanie zaokrąglenia 
wykonywanego po całym ciągu instrukcji, w cza- 
sie egzekwowania których argumenty pozostaną 
w formacie rozszerzonym. 

Przy planowanej szybkości wykonywania roz- 
kazów, niewielkie różnice czasu przechodzenia 
sygnałów przez bramki logiczne procesora i ko- 
procesora mogą zakłócić synchronizację obli- 
czeń. Dlatego zarówno dla CPU, jak też dla 
koprocesora przewidziano identyczne ścieżki 
wejścia/wyjścia i bufory. Obydwie jednostki będą 
taktowane tym samym, zewnętrznym zegarem 
(w IBM PC/AT zegary procesora i koprocesora 
mogą mieć inną częstotliwość pracy). Dzięki 
temu zostanie nie tylko ulepszona synchroniza- 
cja, ale też umożliwiona praca krokowa całego 
systemu podczas uruchamiania programu. 

Wychwytywanie rozkazów dla koprocesora 
przez CPU i ich przekazywanie magistralą ad- 
resową wyeliminuje konieczność dołączania do 
koprocesorów osobnych magistral instrukcji 
i uprości ich budowę. 

W czasie prób z układami zbudowanymi z ar- 
senku galu stwierdzono. że opóźnienie sygnału na 
pojedynczej bramce jest tuk małe, iż o szybkości 
pracy systemu decyduje cza» przekazywania syg- 
nałów pomiędzy układami losicznymi. Jest on 
tym mniej znaczący, im więcej bramek mieści się 
w obszarze jednej struktury. (znacza to, że 
będzie można częściej wykorzystywać techno- 
logię GaAs wtedy, gdy inżynierowie opracują 
metody budowania układow WLSI z arsenku 
galu. 


wg M. and M. 8/87 
opracował Adam Nowicki 





PRZYPRAWY DO LOTUSA 


Pakiet 1-2-3 firmy Lotus ustanowił 
wśród elektronicznych arkuszy oblicze- 
niowych standard wciąż trudny do poko- 
nania. Nic więc dziwnego, że wielu pro- 
ducentów oprogramowania zrezygnowa- 
ło z prób wprowadzania na rynek kon- 
kurencyjnych produktów. Postanowili oni 
natomiast wykorzystać popularność 1-2-3 
poprzez uzupełnianie i rozszerzanie jego 
funkcji. W ten sposób pojawiło się na 
rynku wiele programów, określanych ja- 
ko „„dodatki do Lotusa”. 


Typowy program-dodatek ma postać 
nakładki, wczytywanej do pamięci wraz 
z samym 1-2-3 i działającej na zasadzie 
rezydującego programu usługowego 
— takiego, jak np. SideKick. Specyficzną 
cechą „dodatków ” jest bezpośredni do- 
stęp do danych w arkuszu i zgodna z 1-2-3 
forma komunikacji z użytkownikiem. 


Dodatkiem ułatwiającym wprowadza- 
nie danych do arkusza jest program 
D.a.v.e firmy Goldata Computer Servi- 
ces. Użytkownik może zdefiniować dowo- 
Ine formularze, każdy składający się 
z maksymalnie 10 ekranów po 256 pól. 
Wpisywanie danych polega na prostym 
wypełnianiu wolnych pól formularza, 
a wpisane dane są wprowadzane bezpo- 
średnio do arkusza 1-2-3. 


D.a.v.e uwalnia użytkownika od kłopo- 
tów z błędnie wprowadzonymi danymi 
— dzięki bogatym możliwościom kon- 
troli. Można zdefiniować granice, w ja- 
kich muszą się zawierać wartości, podać 
listę dopuszczalnych możliwości lub 
utworzyć referencyjny plik ASCII. Można 
nawet nakazać sprawdzanie, czy każda 
pozycja kolumny ma unikalną wartość. 
Kontrola poprawności danych obejmuje 
także istniejące już arkusze — wystarczy 
padać wymagane kryteria, a D.a.v.e 
wskaże podświetleniem pola, których za- 
wartość budzi podejrzenia. Pola te mogą 
być następnie poprawiane z wykorzy- 
staniem wygodnego edytora programu 
D.a.v.e Można też wydrukować raport 
o wykrytych usterkach. 


D.a.v.e rozszerza możliwości wydruku 
danych z arkusza — każdy formularz 


czać w polach arkusza. Szczególnie przy- 
datną cechą programu InWord są tzw. 
żywe połączenia — w opracowywanym 
dokumencie można umieścić odnośniki 
do wybranych pól arkusza, a każda zmia- 
na zawartości tych pól będzie natych- 
miast odwzorowana w tekście. Można 
także korzystać z bazy danych zawartej 
w arkuszu przy seryjnych wydrukach po- 
dobnej treści (funkcja mailmerge). 


InWord wykorzystuje pełne możliwości 
drukarek — od typowych 9-igłowych po 
laserowe — do tworzenia profesjonalnie 
wyglądających wydruków. Można uży- 
wać kursywy, druku wytłuszczonego 
i podkreślonego, mieszając dowolnie 
kroje i wielkości czcionek. 


Z myślą o użytkownikach skompliko- 
wanych arkuszy firma Funk opracowała 
program Noteworthy, przeznaczony do 
opisywania i dokumentowania zawarto- 
ści arkusza. Dzięki niemu nie trzeba się 
zastanawiać, co kryje się za treścią danej 
komórki — wystarczy przycisnąć ,,gorą- 
cy klawisz” i wywołać na ekran notatkę 
opisującą wskazywane pole. Notatki — li- 
czące do 8000 znaków każda — mogą być 
tworzone za pomocą wbudowanego edy- 
tora programu, w dowolnie zdefiniowa- 
nym (co do rozmiarów i położenia) okien- 
ku na ekranie. Można przenosić zapiski 
z arkusza do notatki i odwrotnie, a także 
pomiędzy notatkami. W czasie pracy No- 
teworthy podpowiada, które komórki ar- 
kusza są opisane — po wskazaniu takiej 
komórki na ekranie zapala się wskaźnik 
notatki. 


Ofertę firmy Funk Software uzupełnia 
program Sideways — generator wielko- 
formatowych wydruków. Dzięki niemu 
użytkownik arkusza liczącego wiele ko- 
lumn nie musi się liczyć z szerokością 
papieru w drukarce. Sideways pozwala 
drukować wzdłuż wstęgi papieru, wyko- 
rzystując dziewięć różnych wielkości 
czcionek i stosując druk wytłuszczony, 
podkreślony i poszerzony. Program po- 
zwala definiować marginesy i format 
stron, dodawać onie ""—_zadzmięe » < 


FOT i jać perfozsą_» 
zdefiniowany do wprowadzania danych ZĘ 
może posłużyć jako wzorzec wydruku. 
Takie podejście pozwala jednocześnie ; 


zwiększyć pojemność arkusza — wszel- 
kie opisy pól umieścić na szablonac' 
formularzy, pozostawiając komórki ark 
sza na dane liczbowe. 


Program D.a.v.e współpracuje z v 
sją 1-2-3 Release 2 (lub późniejs 
zajmuje 64 KB pamięci komputera 
sztuje 149,95 dolarów. 


Kolejnym'producentem, który po: 
wił uzupełnić swoimi programami 
Lotusa, tym razem w dziedzinie p 
twarzania tekstu, była firma Funk 
ware. Oferowany przez nią pro 
InWord jest profesjonalnym edytc 
tekstu, pracującym w środowisku 1-. 


InWord zawiera wszystkie typowe i 
kcje edytorskie dostępne w samodzi 
nych procesorach tekstowych. Możr 
wprowadzać fragmenty arkusza «: 
tekstu, a wybrane partie tekstu umiesz- 


Programy firmy Funk współpracują 
z pakietami 1-2-3 Release 2 (Sideways 
również z wcześniejszymi wersjami) 
oraz Symphony. Ich ceny mieszczą się 
w zakresie poniżej 100 dolarów za pro- 
gram. 


Kompleksową oprawę Lotusa. 1-2-3 
proponuje też Turner Hall Publishing. 
W ofercie znajdują się programy podob- 
ne do opisanych powyżej — integralny 
edytor tekstowy 4WORD i program do 
opisywania pól arkusza Note-lt Plus. 
Popularną już od pewnego czasu funkcją 
jest kompresja danych z arkusza. Pro- 
gram SQZ! pozwala zredukować obję- 
tość pliku zajętego przez arkusz nawet 
095% (!), uwalniając znaczną przestrzeń 
dysku i nieporównywalnie przyspiesza- 
jąc wczytywanie arkusza do pamięci. 


Kontrolę poprawności danych w arku- 
szu zapewnia The Cambridge Spreads- 
heet Analyst — program obecny już 
w większości liczących się biur Ameryki. 
The Analyst potrafi wyszukać 25 rodza- 
jów błędów w arkuszu, badając nie tylko 
wartości pól, ale i powiązania między 
nimi. Wbudowany The Spreadsheet Com- 
parator pozwala kontrolować różne wer- 
sje tego samego arkusza i nadzorować 
poprawność arkuszy rozproszonych. The 
Analyst zawiera też narzędzia do analizy 
i korekty makrodefinicji. Można też za- 
dbać o poprawność językową arkusza. 
Zapewnia ją program Spellin!, spraw- 
dzający pisownię wyrazów wpisanych 
w pola arkusza. 


Najdroższe z programów Turner Hall 
— 4WORD i The Cambridge Spreadsheet 
Analyst — kosztują po 99,95 dolarów. 
Programy te są już dostępne w wersji dla 
komputerów PS/2 — na dyskietkach 3,5- 
-calowych. 


Obserwatorzy rynku uznają dodatki do 
popularnych pakietów za szczególnie 
obiecującą gałąź oprogramowania do 
zastosowań profesjonalnych. Nie chodzi 
jednak tylko o komfort pracy, lecz rów- 
nież o bezpieczeństwo prowadzonych in- 
teresów — nietrudno wyobrazić sobie 
straty, jakie może spowodować błąd 
w arkuszu opisującym wielomilionowe 
transakcje lub błędna interpretacja za- 
. 10 7Arki takiego arkusza. 
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